Sorting algorithms/Quicksort: Difference between revisions

Content added Content deleted
m (Redundant cat link)
Line 251: Line 251:
writefln(quickSort(a2));
writefln(quickSort(a2));
}
}


=={{header|Erlang}}==
like haskell

qsort([]) -> [];
qsort([X|Xs]) ->
qsort([ Y || Y <- Xs, Y < X]) ++ [X] ++ qsort([ Y || Y <- Xs, Y >= X]).


=={{header|Forth}}==
=={{header|Forth}}==