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_VOCALS
disp(['map_sondes: ' cruise ' ' year]);

if nargin==1
    m_proj('mercator','longitudes',varargin(1:2),'latitudes',varargin(3: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',0.5+[0 0 0]);
m_coast('patch',[.7 .7 .7],'edgecolor','none');

m_grid('xtick',-90:5:60,'ytick',-25:5:10,'linestyle','none')

% time markers for VOCALS 2008
m_text(-83,3,'20','verticalalignment','middle','horizontalalignment','center');
m_text(-87,-20,'25','verticalalignment','middle','horizontalalignment','center')
m_text(-85,-22,'28','verticalalignment','middle','horizontalalignment','center');
m_text(-75,-22,'30','verticalalignment','middle','horizontalalignment','center')

m_line(lon,lat,'color','b','linestyle','none','marker','.');
title([cruise ' ' year ' RHB rawinsonde locations']);   
