let rec($)s n=print_endline s;n>1&s$n-1and(+)i c=if i<0then""else" "^c^i-1+c let a,d,e=17+"a",6+"c"^7+"d",13+"e"^9+"g";;a^14+"b"$15;a^d$3;13+"e"^3+"f"^d$4;e^" h"^7+"d"$1;e^8+"i"$9
Note that non-ascii characters in the above source code will be escaped (such as \x9f).