From: Ramakrishnan Muthukrishnan <vu3rdd@gmail.com>
Date: Tue, 4 May 2010 09:56:12 +0000 (+0530)
Subject: solution to 1.29.
X-Git-Url: https://git.rkrishnan.org/listings/vdrive/something?a=commitdiff_plain;h=b22d54d1e79f635b5f42cd9a0466beb374b5d5a3;p=sicp.git

solution to 1.29.
---

diff --git a/src/sicp/ex1_29.clj b/src/sicp/ex1_29.clj
index 33a3458..cf30a23 100644
--- a/src/sicp/ex1_29.clj
+++ b/src/sicp/ex1_29.clj
@@ -3,12 +3,6 @@
 	[clojure.contrib trace test-is]))
 
 ;; simpson's rule of integration
-(defn sum [term a next b]
-  (if (> a b)
-    0
-    (+ (term a)
-       (sum term (next a) next b))))
-
 (defn make-fac [k n]
   (cond (= k 0) 1
 	(= k n) 1