#| BEGIN (Write your solution here) |#
(define (double f)
  (lambda (x)
    (f (f x))))
#| END |#