for i=10000to 10300do let rec($)a b c d=a=0&()=Printf.printf"%d "b||c>0&(a$b)(d mod c)c||(a-1$b+1/d)(a-1)i in(i$0)0i done

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page