[Haskell-cafe] Quicksort in Haskell

[yrazes]

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
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.haskell.org/pipermail/haskell-cafe/attachments/20111107/9e814d8b/attachment.htm>