Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted as Haskell by nitnatsnok ( 16 years ago )
hoar :: [Int] -> [Int]
hoar [] = []
hoar (x:xs) = hoar [y | y <- xs, y < x] ++
[x] ++
hoar [y | y <- xs, y >= x]
Revise this Paste