let rec f?(r=read_line())s=r="i"&f(s+1);r="d"&f(max(s-1)0);r="s"&(s=16&f 0;f(s*s));r>"h"&()=Printf.printf"%d "s;f s;;f 0
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page