[Haskell-cafe] Quicksort in Haskell

module Main (main) where quicksort [] = [] quicksort (s:xs) = quicksort [x|x <- xs,x < s] ++ [s] ++ quicksort [x|x <- xs,x >= s] main = putStr "Ingrese la lista\n" [xs] <- getLine