RosettaCodeData/Task/Factorial/Erlang/factorial-3.erl
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

3 lines
63 B
Erlang

fac(N) -> fac(N-1,N).
fac(1,N) -> N;
fac(I,N) -> fac(I-1,N*I).