summaryrefslogtreecommitdiffstats
path: root/net
diff options
context:
space:
mode:
authorrsiddharth <s@ricketyspace.net>2017-07-08 17:47:55 +0000
committerrsiddharth <s@ricketyspace.net>2017-07-08 17:47:55 +0000
commit87e1c288bb7de9f4ed2c8f02d9854e0397a2a9a5 (patch)
treeadf3e031382ce11b17cdf69d129f99e72f1bbab4 /net
parentd022481e3c3e9337e22b9d92bf805065bd64d05f (diff)
net: Add three-primes-gt-1000
* net/ricketyspace/sicp/one/twentytwo.scm (three-primes-gt-1000): New function.
Diffstat (limited to 'net')
-rw-r--r--net/ricketyspace/sicp/one/twentytwo.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/net/ricketyspace/sicp/one/twentytwo.scm b/net/ricketyspace/sicp/one/twentytwo.scm
index 7eab420..aefab51 100644
--- a/net/ricketyspace/sicp/one/twentytwo.scm
+++ b/net/ricketyspace/sicp/one/twentytwo.scm
@@ -57,3 +57,6 @@
(else (three-primes-gt-iter n
(+ e 10)
(search-for-primes n e)))))
+
+(define (three-primes-gt-1000)
+ (three-primes-gt 1000))