function M = psi_num_termos(tipok,L_rel)
%L_rel = tam_dominio/raio absoluto
S = suporte_da_funcao_mae(tipok);
M = ceil(S/L_rel);


    