(define (square x)(* x x))
(define a (* 5 5))
(define (b) (* 5 5))
(define (sum-of-squares x y)
(+ (square x)
(square y)))
(define (f a) (sum-of-squares (+ a 1) (* a 2)))
(define (pretty-sum a b)
(display a)(display ” + “)(display b)
(newline)(display ” = “)
(+ a b))
(define (myfunc a)
(+ a 1)
(* a 2)
(- a a)
a)
(myfunc 17)