(do*((a()`(,@a,b))(b 2(do'(j 2)((if(find(incf j)a)/(>(gcd j b)1))j))))((= b 159)(format t"1~{ ~A~}"a)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page