Factoradic Counter by monqy

(%)=divMod
r&b=r*10^(b-1)
(0,r)#b=r&b
(q,r)#b=q%(b+1)#(b+1)+r&b
m@main=mapM(print.(#1).(%1))[0..1000]

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

download

return to the top page