; Section 2.6 - Functions (Page 14)
; Zachary Murray (zmurray@mix.wvu.edu)

; Example 1 - Page 15

; (defun our-third (x)
;   (car (cdr (cdr x))))

(defn our-third [x]
  (first (next (next x))))

; Example 2 - Page 15

; (our-third '(a b c d))

(our-third '(a b c d))

; Example 4 - Page 15

; (defun sum-greater (x y z)
;   (> (+ x y) z))
; (sum-greater 1 4 3)

(defn sum-greater [x y z]
  (> (+ x y) z))
(sum-greater 1 4 3)