Changed size of prime arrary to 10000

2012-11-08 18:34:29 +01:00 · 2012-11-08 18:34:29 +01:00 · 9307cbb120
commit 9307cbb120
parent 2178282fd6
1 changed files with 1 additions and 1 deletions
--- a/collects/math/private/number-theory/number-theory.rkt
+++ b/collects/math/private/number-theory/number-theory.rkt
@ -52,7 +52,7 @@
 (define prime-strong-pseudo-trials
  (integer-length (assert (/ 1 prime-strong-pseudo-certainty) integer?)))

-(define *SMALL-PRIME-LIMIT* 1000000)
+(define *SMALL-PRIME-LIMIT* 10000)
 ; (define *SMALL-PRIME-LIMIT* 1000) ; use 1000 for coverage testing
 ; Determines the size of the pre-built table of small primes
 (define *SMALL-FACORIZATION-LIMIT* *SMALL-PRIME-LIMIT*)