代码:
loop(0) -> 1;
loop(N) when N > 0 -> N * loop(N-1).
tail_loop(N) -> tail_loop2(N, 1).
tail_loop2(0, R) -> R;
tail_loop2(N, R) -> tail_loop2(N-1, N *R).
参考资料:
http://tech.it168.com/j/2008-01-30/200801301900367.shtml
代码:
loop(0) -> 1;
loop(N) when N > 0 -> N * loop(N-1).
tail_loop(N) -> tail_loop2(N, 1).
tail_loop2(0, R) -> R;
tail_loop2(N, R) -> tail_loop2(N-1, N *R).
http://tech.it168.com/j/2008-01-30/200801301900367.shtml