1 1 500{0 1 1 3 index{2 copy 1 sub lt{[exit}if 2 index 1 index mod{pop 0}repeat add}for[ne{=}if}for
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page