Improve readability

dwinston · Jun 11, 2014 · 0e8172f · 0e8172f
1 parent 4f067dc
commit 0e8172f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/ex1.7.scm b/ex1.7.scm
@@ -50,7 +50,8 @@
 
 
 (define (good-enough? guess x)
-  (< (abs (- 1 (/ (improve guess x) guess))) 0.001))
+  (< (abs (- 1 (/ (improve guess x) guess)))
+     0.001))
 
 
 1 ]=> (/ (sqrt (square 0.001)) 0.001)

diff --git a/ex1.8.scm b/ex1.8.scm
@@ -10,7 +10,8 @@
      3))
 
 (define (good-enough? guess x)
-  (< (abs (- 1 (/ (improve guess x) guess))) 0.001))
+  (< (abs (- 1 (/ (improve guess x) guess)))
+     0.001))
 
 (define (cube-root x)
   (cube-root-iter 1.0 x))