src/sicp/ex1_20.clj

   1 (ns sicp.ex1_20
   2   (:use [sicp utils]
   3         [clojure.contrib trace test-is]))
   4
   5 ;;; exercise 1.20.
   6 ;;
   7 ;;  normal order - 18, applicative order - 4.
   8 ;;
   9 ;;   too lazy to scan things from the notebook. May be I should instead
  10 ;;   use a wiki.