1 files changed, 73 insertions, 0 deletions
diff --git a/factor.txi b/factor.txi
new file mode 100644
index 0000000..8277c2b
--- /dev/null
+++ b/factor.txi
@@ -0,0 +1,73 @@
+
+
+
+@defvar prime:prngs
+
+ @var{prime:prngs} is the random-state (@pxref{Random Numbers}) used by these
+ procedures.  If you call these procedures from more than one thread
+ (or from interrupt), @code{random} may complain about reentrant
+ calls.
+@end defvar
+
+
+
+
+
+
+@defun jacobi-symbol p q
+
+ Returns the value (+1, @minus{}1, or 0) of the Jacobi-Symbol of
+ exact non-negative integer @var{p} and exact positive odd integer @var{q}.
+@end defun
+
+
+@defvar prime:trials
+
+ @var{prime:trials} the maxinum number of iterations of Solovay-Strassen that will
+ be done to test a number for primality.
+@end defvar
+
+
+
+
+@defun prime? n
+
+ Returns @code{#f} if @var{n} is composite; @code{#t} if @var{n} is prime.
+ There is a slight chance @code{(expt 2 (- prime:trials))} that a
+ composite will return @code{#t}.
+@end defun
+
+
+
+@defun primes< start count
+
+ Returns a list of the first @var{count} prime numbers less than
+ @var{start}.  If there are fewer than @var{count} prime numbers
+ less than @var{start}, then the returned list will have fewer than
+ @var{start} elements.
+@end defun
+
+
+
+@defun primes> start count
+
+ Returns a list of the first @var{count} prime numbers greater than @var{start}.
+@end defun
+
+
+
+ 
+ 
+
+ 
+
+
+
+
+
+@defun factor k
+
+ Returns a list of the prime factors of @var{k}.  The order of the
+ factors is unspecified.  In order to obtain a sorted list do
+ @code{(sort! (factor @var{k}) <)}.
+@end defun