Merge branch 'master' of github.com:vu3rdd/sicp

[sicp.git] / src / sicp / ex2_20.clj

diff --git a/src/sicp/ex2_20.clj b/src/sicp/ex2_20.clj
index 079248f87b6b3ebd3620d6fef4e73fe59ad240a4..590ff31b8c93a3bf289c95a97a43df14e4926027 100644 (file)
--- 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))))))