pow(n , p);

function y = pow(n , p);
%POW     fonction puissance trs inefficace.
%        y = power(n , p);
%        calcul rcursif par multiplications successives.
if p ~= 0
   y = n*pow(n,p-1);
else
   y = 1;
end;