From: Ramakrishnan Muthukrishnan Date: Wed, 25 Aug 2010 18:19:27 +0000 (+0530) Subject: minor formatting changes X-Git-Url: https://git.rkrishnan.org/vdrive/%22file:/frontends/FOOURL?a=commitdiff_plain;h=75cf1b114022e2da9fb74296d7db12df74c07f95;p=sicp.git minor formatting changes --- diff --git a/src/sicp/ex2_20.clj b/src/sicp/ex2_20.clj index 079248f..590ff31 100644 --- a/src/sicp/ex2_20.clj +++ b/src/sicp/ex2_20.clj @@ -14,7 +14,7 @@ (if (empty? xs) (reverse result) (let [a (first xs) - t (pred a)] + t (pred a)] (if t (calc-parity pred (rest xs) (cons a result)) (calc-parity pred (rest xs) result))))) @@ -28,7 +28,7 @@ (if (empty? xs) nil (let [a (first xs) - t (pred a)] + t (pred a)] (if t (cons a (calc-parity-3 pred (rest xs))) (calc-parity-3 pred (rest xs))))))