n=readline(),function
q(o,l,x){for(x=l^n?-1:print.apply(0,o);f=++x<n;f&&q(o.concat(x),-~l))for(i=l;f&&i--;f*=v&&i-l-v&&l-i-v)v=o[i]-x}([])