%plantarctic_SOGlobecArea.m
%plot up all Mocness tows taken on nbp0103 - fall 2001.
%
%
figure

m_proj('albers equal-area','lat',[-70.5 -65.5],'long',[-77 -66],'rect','on');
%m_proj('albers equal-area','lat',[-70.5 -65.5],'long',[-85 0],'rect','on');  %use this one with m_gshhs_h to get coastline that will plot
%m_gshhs_h('save','marguerite'); %do this only when to extract portion of intermdiate resolution data base
%m_usercoast('marguerite','patch',[.2 .7 .2]); % color green
m_usercoast('marguerite','patch',[1 1 1]); % color white
m_grid('linewidth',2,'tickdir','out','fontsize',[16]);
%m_text(-66.5,43.5,'GSHHS\_L (low)','color','m','fontweight','bold','fontsize',14);

hold on

return

load C:\Antarctic\CruiseReports\CruiseReport_NBP0103\NBP0103CTD_Positions.txt
%format of the data in txt file
%event cast  year  yrday  time_utc  lat        lon         xgrid  ygrid  depth_w  depth  station 
[X,Y]=m_ll2xy(NBP0103CTD_Positions(:,7), NBP0103CTD_Positions(:,6));
h2=plot(X,Y,'sk');
set(h2,'markersize',6,'MarkerFaceColor','y')
%return

load C:\Antarctic\CruiseReports\CruiseReport_NBP0103\NBP0103MOC1_Positions.txt
%format of the data in txt file
%cast    station          station_std  lat          lon    
[X1,Y1]=m_ll2xy(NBP0103MOC1_Positions(:,5), NBP0103MOC1_Positions(:,4));
for i=1:2:length(NBP0103MOC1_Positions(:,1));
h2=plot(X1(i),Y1(i),'ok');
set(h2,'markersize',9,'MarkerFaceColor','r')
end