%  DoPTSplots.m   - creates a series of T-S plots for different cruises and
%                   sets of stations. Also can create T-O2 plots. 
%                   Saves figures to postscript files. 
%    needs variables set: GEOMINFO CRUISEINFO DEFAULTS
%    sets variables: CruiseName Line FixGrid DepthResolution
%    calls: SetupPlots plotPTS plotPTO2
%

MakePlot=1;
SkipPlot=0;

%SetDefaults;

%DepthResolution='StdDepth';
DepthResolution='OneMeter';
%Line='alls';
Line='grid';
%Line='x500';
FixGrid=0;

if MakePlot
%  CRUISEINFO=0;
  CruiseName='NBP0103';
  SetupPlots;
  plotPTS;
%  plotPTO2;
%  print('-dpsc2',['plotPTS.' CruiseName '.ps']);
  print('-dps2',['plotPTS.' CruiseName '.ps']);
end

if MakePlot
  CRUISEINFO=0;
  CruiseName='NBP0104';
  SetupPlots;
  plotPTS;
%  print('-dpsc2',['plotPTS.' CruiseName '.ps']);
  print('-dps2',['plotPTS.' CruiseName '.ps']);
end

if SkipPlot
  CRUISEINFO=0;
  CruiseName='NBP0202';
  SetupPlots;
  plotPTS;
%  print('-dpsc2',['plotPTS.' CruiseName '.ps']);
end

if SkipPlot
  CRUISEINFO=0;
  CruiseName='NBP0204';
  SetupPlots;
  plotPTS;
%  print('-dpsc2',['plotPTS.' CruiseName '.ps']);
end


