function pxy = funcao_mae_cm(r)
%Base com suporte compacto
r = abs(r);
aux2 = 1 - r;
if aux2 >= 0
    pxy = (1-r)^4*(4*r+1);
else
    pxy = 0;
end
