(define (repeated f n)
  (define (calc-n-maal x)
    (define (iter nogtegaan result)
      (if (= nogtegaan 0)
          result
          (iter (- nogtegaan 1) (f result))))
    (iter n x))
  calc-n-maal)