1189 1682 0/s{dup log 1 4{pop( )print}for dup =only}def 1 10{(A)print dup =only 9 le{( )print}if 2 idiv s(mm x)print exch s(mm)=}for
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page