Haskell, 67 bytes
(q:r)!x|null q||last q<=x=(q++[x]):r|1<2=q:r!x
_!x=[[x]]
foldl(!)[]
Cristian Lupascu
- 8.7k
- 2
- 25
- 52
(q:r)!x|null q||last q<=x=(q++[x]):r|1<2=q:r!x
_!x=[[x]]
foldl(!)[]