Erlang (programovací jazyk): Porovnání verzí

== Kód ==

Zápis jazyka vypadá takto:

-module(fact).

-export([fac/1]).

fac(0) -> 1;

fac(N) when N > 0 -> N * fac(N-1).

 

Implementace algoritmu [[Quicksort]]:

%% quicksort:qsort(List)

%% Sort a list of items

qsort([Pivot|Rest]) ->

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

 

== Reference ==