Prob 5 in Racket