function vale=esatta2(i,x)
if i==0
  vale=1-abs(x).^(5/4);
elseif i==1
  vale=-5/4*abs(x).^(1/4).*sign(x);
end
