function h = pacific_noresize_at_all(v)

  if nargin==0, v=[0 360 -90 89]; end
%axis(v)
dlon = v(2)-v(1);
dlat = v(4)-v(3);
width  = dlon;
height = abs(dlat);
width/height;
if (width/height)>4 
  height=width/4;
end


dlon = v(2)-v(1);
dlat = v(4)-v(3);
load coast
ii=find(abs(diff(mod(long,360)))>300);
ind=1:ii(1);
set(gca,'nextplot','add')
plot(long(ind),lat(ind),'k');
plot(long(ind)+360,lat(ind),'k');

ind=ii(5):(1+ii(5));
%x=mod(long(ind),360);
y=lat(ind);
x=long(ind);
plot(x,y,'k');

for j=1:(length(ii)-1)
  ind=1+ii(j):ii(j+1);
  x=mod(long(ind),360);
  y=lat(ind);
  plot(x,y,'k');
  x=mod(long(ind),360)-360;
  plot(x,y,'k');
end
ind=1+ii(end):length(long);
plot(mod(long(ind),360),lat(ind),'k');
plot(mod(long(ind),360)-360,lat(ind),'k');
%set(gca,'PlotBoxAspectRatio',[width height 1])
%set(gcf,'position',[800 (900-height/width*600) 600 height/width*600])

% long
%check if too small
xt=get(gca,'xtick');
if (xt(2)-xt(1))<4
  set(gca,'xtick',xt(1:2:end))
end
if length(xt)>9
  set(gca,'xtick',xt(1:2:end))
end
xtl=get(gca,'xticklabel');
xtln=str2num(xtl);
EW=num2str(ones(size(xtl,1),1));
idx=xtln>180;ideq=xtln==180;idneg=xtln<0;
EW(idx)='W';EW(~idx)='E';EW(ideq)=' ';EW(idneg)='W';
xtl= strcat(num2str(power(-1,idneg).*~idx.*xtln+idx.*(360-xtln)),setstr(hex2dec('B0')),EW);
xtl= strcat(num2str(power(-1,idneg).*~idx.*xtln+idx.*(360-xtln)),EW);
set(gca,'xticklabel',xtl)
% lat
ytl=get(gca,'yticklabel');
ytln=str2num(ytl);
NS=num2str(ones(size(ytl,1),1));
idx=ytln>0;ideq=ytln==0;
NS(idx)='N';NS(~idx)='S';NS(ideq)=' ';
ytl= strcat(num2str(abs(ytln)),NS);
set(gca,'yticklabel',ytl)
set(gca,'XTickMode','manual')
set(gca,'YTickMode','manual')
set(gca,'nextplot','replace')

