From aaafb02016adfd2c930a18edecf113cb684ee4cf Mon Sep 17 00:00:00 2001 From: Ramakrishnan Muthukrishnan Date: Mon, 14 Jun 2010 08:32:52 +0530 Subject: [PATCH] bug fix. --- src/sicp/ex2_7.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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))) -- 2.45.2