1 .runstdin 2 sub -1 0{{( )=only}repeat dup{(*)=only}repeat 2 add()=}for 2 idiv -1 4{( )print}for/COBOL =
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page