Slide 4 : 4
(define (
negate
p) (
lambda
(x)
(if (p x) #f #t)
))