samof76 · June 3, 2011 11:05
diff --git a/fact.erl b/fact.erl
 -module(fact).    % This is the file 'fact.erl', the module and the filename MUST match
 -export([fac/1]). % This exports the function 'fac' of arity 1 (1 parameter, no type, no name)
 
 fac(0) -> 1; % If 0, then return 1, otherwise (note the semicolon ; meaning 'else')
 fac(N) when N > 0, is_integer(N) -> N * fac(N-1).
 % Recursively determine, then return the result
 % (note the period . meaning 'endif' or 'function end')
	-module(fact). % This is the file 'fact.erl', the module and the filename MUST match
	-export([fac/1]). % This exports the function 'fac' of arity 1 (1 parameter, no type, no name)

	fac(0) -> 1; % If 0, then return 1, otherwise (note the semicolon ; meaning 'else')
	fac(N) when N > 0, is_integer(N) -> N * fac(N-1).
	% Recursively determine, then return the result
	% (note the period . meaning 'endif' or 'function end')