McCarthy 91 function by BioFALSE

sub w{print'M('x$i.~~$_.')'x$i.$/;$i--;$_>1e2?$_-=10:($i+=2,w(w($_+=11)))}$i=1,w,print 91for<>

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

download

return to the top page