let rec($)m?(w=m*m*m)j n=n<763&m=n&(j=6&()=Printf.printf"%d "n;2$0)(n+1);(m+1$j+n/m*m/n-n/w*w/n)n;;(2$0)9
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page