function v = funcao_mae_lanczos(z,a)

if abs(z) < a
    if abs(z) < 1.0e-6
        v = 1;
    else
        v1 = sin(pi*z)/(pi*z);
        v2 = sin(pi*z/a)/(pi*z/a);
        v = v1*v2;
    end
else
    v = 0;
end
