Task

Write a procedure which accepts as arguments another procedure and a positive integer.

The latter procedure is executed a number of times equal to the accepted integer.




(defun repeat (f n)
    (f)
    (if (> n 1)
        (repeat f (- n 1)) ) )
 
;; an example to test it:
(repeat (lambda () (print '(hello rosetta code))) 5)