function y = moler(x)
if x == 1
    y = 0;
else
    y = sign(x-1)*sqrt(abs(x-1));
end
end