diff options
-rw-r--r-- | lazy-seqs.clj | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/lazy-seqs.clj b/lazy-seqs.clj index 9a8aa714..34cfc84c 100644 --- a/lazy-seqs.clj +++ b/lazy-seqs.clj @@ -31,16 +31,6 @@ (lib/use def) -(defn isqrt - "Returns the integer square root of n" - [n] - (loop [xn 1] - (prn xn) - (let [xn1 (quot (+ xn (quot n xn)) 2)] - (if (= xn1 xn) - xn1 - (recur xn1))))) - (defvar primes (lazy-cat [2 3 5 7] (let [primes-from |