求mjj大佬们,20cm吴彦祖们推荐个快排路子

hzyellow1991

先谢过各位彦祖了

daibillion

没人理我吗?单机了?

灌水王

快排？quicksort？
```hs
quicksort :: (Ord a) => [a] -> [a]
quicksort [] = []
quicksort (x:xs) = quicksort [a | a <- xs, a <= x] ++ [x] ++ quicksort [a | a<-xs, a>x]
```
不谢。