function v = funcao_mae_ricker(z)

if abs(z) < 9
    if abs(z) < 1.0e-6
        v = 1;
    else
        v = (1 - z^2)*exp(-.5*z^2);
    end
else
    v = 0;
end