main=interact$f
f(x:z)=x:'\n':f[y|y<-z,y>x]
f x=x