2008-12-26 14:58:46 -05:00
|
|
|
USING: help.markup help.syntax ;
|
|
|
|
IN: math.primes.erato
|
|
|
|
|
|
|
|
HELP: sieve
|
|
|
|
{ $values { "n" "the greatest odd number to consider" } { "arr" "a bit array" } }
|
2010-10-22 21:26:08 -04:00
|
|
|
{ $description "Apply Eratostene sieve up to " { $snippet "n" } ". Primality can then be tested using " { $link marked-prime? } "." } ;
|
2008-12-26 14:58:46 -05:00
|
|
|
|
2009-06-24 07:04:20 -04:00
|
|
|
HELP: marked-prime?
|
|
|
|
{ $values { "n" "an integer" } { "arr" "a byte array returned by " { $link sieve } } { "?" "a boolean" } }
|
2010-10-22 21:26:08 -04:00
|
|
|
{ $description "Check whether an odd integer between 3 and the limit given to " { $link sieve } " has been marked as a prime number."} ;
|