% File M_Herm
% Gera a matriz que descreve os polin�mios de Hermite em fun��o da base
% can�nica (do menor para o maior)

function M = M_Leg_A(n)

if n == 0
    M = 1;
elseif n == 1
    M = [1,0;1,0];
else
 %% Legendre's recurrence relations
M = zeros(n+1,n+1);
    M(1,1)= 1;  M(2,2) = 1;
    
    for k = 2:n
        M(k+1,:) = ([0,M(k,1:n)]*(2*k-1) - M(k-1,:)*(k-1) )/k;
    end   
%%
end