-module(p). -export([m/0]). m()->io:fwrite(p("012345")). p([A])->[[A,10]];p(L)->[[H,32|T]||H<-L,T<-p(L--[H])].
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page