(define (square)
  (lambda (x)
    (* x x)))
 
(define my-sq (square))
 
(print (my-sq 3))