{for(i=1;j=k<$1;k+=j~i&&S=S i RS)for(i++;i%++j;);}$0=S
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page