-module(p).
-export([m/0]).
m()->[io:fwrite(tl(S)++"
")||S<-p("012345")].
p([])->[""];p(L)->[[32,H|T]||H<-L,T<-p(L--[H])].