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())