function  y = merc2deg(y,ext)

% function  y = merc2deg(y,ext)

if ext        

  y = 2*180/pi * ( atan(exp(y*ext*pi/180)) - pi/4 ) / ext;

end