[1[.runstdin]{-1 1{/n exch def 0][0 2 index{n mul add dup 10 mod exch 10 idiv}forall 2{-99 1{}for}repeat}for counttomark{=only}repeat()=[1}forall
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page