Ultra useful primes: Difference between revisions

(Add Factor)
Line 26:
 
: useful ( -- list )
1 lfrom [ 2^ 2^ ] lmap-lazy
[ 2^ 2^ 1 lfrom [ - prime? ] with lfilter car ] lmap-lazy ;
 
10 useful ltake [ pprint bl ] leach nl</lang>
1,827

edits