group elements by notogawa

main=interact$('[':).foldr(#)"]"
a#(s:x)|s<a,a/=x!!0||s<' '=a:']':s:'[':x
a#x=a:x

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page