Skip to content

Instantly share code, notes, and snippets.

@renatooliveira

renatooliveira/quicksort.hs

Created June 26, 2013 04:07
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save renatooliveira/5864699 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save renatooliveira/5864699 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
quicksort.hs
quicksort [] = []
quicksort (a:as) = quicksort [x | x <- as, x <= a] ++ [a] ++ quicksort [x | x <- as, x > a]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment