write a function that will compute the area of a circle given the radius.
(define (area r) (* 3.14 (* r r)))