olof/quicksort.erl

Forked from davorb/quicksort.hs

Created March 24, 2012 23:43

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/olof/2189154.js"></script>
Save olof/2189154 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

quicksort.erl

	qsort1([]) -> [];
	qsort1([H\|T]) -> qsort1([X\|\|X<-T,X<H])++[H]++qsort1([X\|\|X<-T,X>=H]).

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