RosettaCodeData/Task/Factorial/Erlang/factorial-3.erl
2023-07-01 13:44:08 -04:00

3 lines
63 B
Erlang

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