Skip to content

Instantly share code, notes, and snippets.

@joaomilho

joaomilho/qs.hs

Created May 4, 2014 15:17
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save joaomilho/3e8941264f3fb9751ed7 to your computer and use it in GitHub Desktop.
Save joaomilho/3e8941264f3fb9751ed7 to your computer and use it in GitHub Desktop.
Download ZIP
Classical quicksort in haskell for didactic purposes
Raw
qs.hs
qs [] = []
qs (x:xs) = qs (filter (<= x) xs) ++ [x] ++ qs (filter (> x) xs)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment