From: Ramakrishnan Muthukrishnan Date: Mon, 14 Jun 2010 03:02:52 +0000 (+0530) Subject: bug fix. X-Git-Url: https://git.rkrishnan.org/(%5B%5E?a=commitdiff_plain;h=aaafb02016adfd2c930a18edecf113cb684ee4cf;p=sicp.git bug fix. --- diff --git a/src/sicp/ex2_7.clj b/src/sicp/ex2_7.clj index 643920c..4a747d9 100644 --- a/src/sicp/ex2_7.clj +++ b/src/sicp/ex2_7.clj @@ -5,8 +5,8 @@ (defn make-interval [x y] (list x y)) -(defn upper-bound [i] +(defn lower-bound [i] (first i)) -(defn lower-bound [i] +(defn upper-bound [i] (first (rest i)))