aostiles/GA9l-0.hs

Created February 28, 2017 07:44

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/aostiles/3e725b560c8ffa4fa84c28ba616c6aaf.js"></script>
Save aostiles/3e725b560c8ffa4fa84c28ba616c6aaf to your computer and use it in GitHub Desktop.

Download ZIP

null created by aostiles - https://repl.it/GA9l/0

Raw

	qsort [] = []
	qsort (x:xs) = (qsort lesser) ++ [x] ++ (qsort greater)
	where
	lesser = filter (<x) xs
	greater = filter (>=x) xs

	main = qsort [3,1,2,3]

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment