Second part of SICP exercise 1.3

sicp-1_3-part2.scm

(define (largest-of-the-two? x y)
  (if (= (largest-of-the-two x y) x)
      true
      false))


(define (larger-than-thou x y z)
  (if (and 
       (largest-of-the-two? x y)
       (largest-of-the-two? x z))
      x
      false))

(define (largest-of-the-three a b c)
  (or 
   (larger-than-thou a b c)
   (larger-than-thou b a c)
   (larger-than-thou c a b)))