(define approximate-golden-ratio
     (lambda (tolerance)

       (define find-approximation-from   ;; does the iteration
         (lambda (starting-point) ... )

       (define good-enough?   ;; checks if answer is within tolerance
         (lambda (approximation) ... )

       (find-approximation-from 1)))