fix word name

db4
Doug Coleman 2008-01-13 10:09:59 -10:00
parent 669104c2e6
commit a6d0c33a94
1 changed files with 1 additions and 1 deletions

View File

@ -77,7 +77,7 @@ TUPLE: miller-rabin-bounds ;
>odd (find-relative-prime) ;
: find-relative-prime ( n -- p )
dup random (find-relative-prime*) ;
dup random find-relative-prime* ;
: unique-primes ( numbits n -- seq )
#! generate two primes