factr(n)

function m = factr(n)
%      factorielle rcursive
if n == 0;
   m = 1;
else
   m = n.*factr(n-1);
end;