function map_epicz(lon,lat,varargin)
% map_epicz(latxx,lonxx,lonlim,latlim)
% Makes a map of the ship track using the m_map package.
% VOCALS 2008 :: 2008-10-29 :: Simon de Szoeke
read_parameters
disp(['map_epicz: ' cruise ' ' year]);

if nargin==1
    m_proj('mercator','longitudes',varargin(1:2),'latitudes',varargin(3:4));
elseif nargin==2
    m_proj('mercator','longitudes',[varargin{1}(1) varargin{1}(2)],'latitudes',[varargin{3} varargin{4}]);
elseif nargin==4
    m_proj('mercator','longitudes',[varargin{1} varargin{2}],'latitudes',[varargin{3} varargin{4}]);
else % default for VOCALS 2008
    m_proj('mercator','longitudes',[-90 -60],'latitudes',[-25 10]);
end
m_coast('linewidth',2,'color','r');
m_coast('patch',[.7 .7 .7],'edgecolor','none');
%m_elev;

m_grid;

m_line(-85,-20,'marker','x','markersize',8,'color','b');
m_line(-85,-20,'marker','o','markersize',8,'color','b');
m_line(-80,-27,'marker','square','markersize',7,'color','k');
m_line(-75,-20,'marker','diamond','markersize',7,'color','k');

delx=.25;

m_line(lon,lat,'color','b','linestyle','-');
title([cruise ' ' year ' R/V Ron Brown Track']);