Permutations by hinoe

*p,n;main(f,s,i){for(i=0;i<6;~f&1<<++i?*p=(n<5)<<13|i+47,5-n++?main(f|1<<i,s):puts(s),--n:0)p=s+n*2;}

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

download

return top