b=a=2*$0+1{for(i=1;gsub($b=$0=e,0)>i;print)$i=i++*--a}1
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page