clairec icon

Untitled

clairec | PRO | 10/02/16 07:31:21 AM UTC | 0 ⭐ | 457 👁️ | Never ⏰ | []
Haskell |

150 B

|

None

|

0 👍

/

0 👎

import Data.List
 
quickSort []     = []
quickSort (x:xs) = (quickSort smaller) ++ [x] ++ (quickSort bigger)
  where (smaller, bigger) = partition (<=x) xs

Comments