6N plus minus one by clock

_:$<
#include"std/num.wake"
1:"+ 1\n"
2:"- 1\n"
(\d+)\n(.*):"$1 = 6 * $(div($(add($1,1)),6)) "$(mod($1,3)) $2

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page