Швидке сортування на Erlang

Матеріал з Вікіджерел
Перейти до: навігація, пошук

Реалізація алгоритма швидкого сортування на Erlang.

%% quicksort(List)
%% Sort a list of items
-module(quicksort).
-export([qsort/1]).

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

Підтвердження [ред.]

Джерело [ред.]