Kolakoski Sequence by ush

b['~~'];i;main(j){for(;i<1e4;j+=b[j]--&1)b[++i]=putchar(50-j%2);}

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

download

return to the top page