(dotimes(x 763)(and(=(length(set's(loop for p from 2 to 127 if(=(1-(gcd p(!(1- p))))(rem x p)0)collect p)))3)(=(apply'* s)x)(format t"~D "x)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page