Langage fonctionnel
Le tri par insertion illustré

-module (isort).
-export ([sort/1]).


sort ([]) -> [];
sort ([Head | Tail]) ->
    insert (sort (Tail), Head).

insert ([], X) -> [X];

insert ([Head | Tail], X) when Head < X ->
    [Head | insert (Tail, X)];

insert (List, X) ->
    [X | List].