10 lines
172 B
Common Lisp
10 lines
172 B
Common Lisp
(load "isprime.l")
|
|
(println
|
|
(prime?
|
|
(format
|
|
(make
|
|
(in '(bzcat M9941.txt.bz2)
|
|
(while (link (line T))) ) ) ) ) )
|
|
(msg 'ok)
|
|
(bye)
|