diff options
| -rw-r--r-- | net/ricketyspace/sicp/one/twentytwo.scm | 3 |
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)) |