#| BEGIN (Write your solution here) |#
(define (solution x y z)  
  (cond ((isSmallest x y z)(sum-of-squares x y))
        ((isSmallest x z y)(sum-of-squares x z))
        ((isSmallest y x z)(sum-of-squares y x))
        ((isSmallest y z x)(sum-of-squares y z))
        ((isSmallest z x y)(sum-of-squares z x))
        ((isSmallest z y x)(sum-of-squares z y))
        (sum-of-squares x y)))

   
(define (sum-of-squares x y)
  (+ (* x x)(* y y)))
  

(define (isSmallest a b c)
   (and (ge? a c)(ge? b c)))

(define (ge? x y)
  (or (> x y)(= x y)))

  
#| END |#