let rec($)m n=n>m&(m>1&()=Format.printf"%d "m;n$Scanf.scanf"%_s@Y%n"pred);;0$1
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page