1 665c255d 2023-08-04 jrmu (define (square x) (* x x))
2 665c255d 2023-08-04 jrmu (define (sum-sqr-two-larger x y z)
3 665c255d 2023-08-04 jrmu   (cond (> x y z) (square x x)