let rec($)n k m i=n<2&()=Printf.printf"%d "k||n/i*i=n&(n/i$m-m/i)m i||(n$k)k(i+1);;for n=10000to 10300do(n$n)n 2done
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page