I'm a clojure newbie. Why does the compiler complain about being unable to resolve cube-root-recur on line 17? thanks
1 (def cube-root
2 (fn [n]
3 (let
4 [abs
5 (fn [n]
6 (if (> n 0) n (- 0 n)))
7 good-enough?
8 (fn [guess]
9 (< (abs (- (* guess guess guess) n)) 0.0001))
10 improve-guess
11 (fn [guess]
12 (/ (+ (/ n (* guess guess)) (* 2 guess)) 3))
13 cube-root-recur
14 (fn [guess]
15 (cond
16 (good-enough? guess) guess
17 :else (cube-root-recur (improve-guess guess))))]
18 (cube-root-recur 1))))
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
