用erlang写一个阶乘函数

以下是用Erlang实现阶乘函数的代码：

-module(factorial).
-export([factorial/1]).

factorial(0) -> 1;
factorial(N) when N > 0 -> N * factorial(N-1).

这个阶乘函数使用递归的方式实现。当输入为0时，返回1；当输入大于0时，返回N * factorial(N-1)。