function h = pnc(option,varargin)
amerc;
if nargin == 0
  han = plotnenacoast(3,'k');
else
  if length(option)==1
    % assume it's a color
    han = plotnenacoast(3,option);
  else
    switch option
      % special cases for lon/lat limits
      case 'fill'
	load gom_h;
	% get plot state
	nextplotstatewas = get(gca,'nextplot');
	% hold whatever is already plotted
	set(gca,'nextplot','add')
	if nargin == 1
	  han = fillseg(ncst,0.8*[1 1 1],0.8*[1 1 1]);
	else
	  han = fillseg(ncst,varargin{:});
	end
	% restore nextplotstate to what it was
	set(gca,'nextplot',nextplotstatewas);
      otherwise
	han = plotnenacoast(-1,'k');
    end
  end
end

if nargout > 0
  h = han;
end

