f=function(a,b){if(!length(a))write(b,"",6);for(n in a)f(a[a!=n],c(b,n))} f(0:5,c())
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page