let(^)=List.map let rec($)n l=n=0&[]=print_int^l;n-1$l@(+)1^l;;8$[0]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page