McCarthy 91 function by kaki

(do((\(read)(+(if(> #0=(mod\ 128)100)-138 139)\)))((=\ 102))(print((rec`i(if(< i 0)#0##`"M(,`(- i 1))"))(ash\ -7))))

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

download

return to the top page