%  DoSections.m   - create a series of vertical sections.
%                   Saves figures to postscript files. 
%    needs variables set:  GEOMINFO CRUISEINFO DEFAULTS
%    sets variables: CruiseName Line FixGrid DepthResolution
%                    xrange deprange UsePotTemp RefPress cl
%    calls: SetupPlots Tsection Ssection O2section Sigsection

MakeTplot=1;
%MakeTplot=0;

%MakeSplot=1;
MakeSplot=0;

%MakeO2plot=1;
MakeO2plot=0;

%MakeSigplot=1;
MakeSigplot=0;

%SetDefaults;
DepthResolution='OneMeter';
CRUISEINFO=0;
%Line='x500';
%Line='x460';
Line='x420';
%Line='x340';
%Line='x300';
%Line='x304';
%Line='x140';
%Line='r001';
FixGrid=0;
%CruiseName='NBP0103';
CruiseName='NBP0104';
%CruiseName='NBP0202';
%CruiseName='NBP0204';
SetupPlots;
UsePotTemp=1;
deprange=[-800 0];
InfoX=120;
InfoZ=-650;

if MakeTplot
  cl=[-1.8 -1.5 -1.0 -.5 0 .5 1.0 1.2 1.4 1.6 1.8 2.];
  Tsection
  print('-dpsc2',['Tsection.' CruiseName '.' Line '.ps'])
end

if MakeSplot
  cl=[33.2 33.3 33.4 33.5 33.6 33.7 33.8 33.9 34.0 34.2 34.4 34.6 34.65 34.7 34.72];
  Ssection
  print('-dpsc2',['Ssection.' CruiseName '.' Line '.ps'])
end

if MakeO2plot
  cl=[4 4.1 4.2 4.3 4.4 4.5 4.75 5 6 7 7.5 8];
  O2section
%  print('-dpsc2',['O2section.' CruiseName '.' Line '.ps'])
end

if MakeSigplot
  cl=[26.8 26.9 27.0 27.2 27.3 27.4 27.5 27.6 27.7 27.75 27.8 27.85];
  Sigsection
  print('-dpsc2',['Sigsection.' CruiseName '.' Line '.ps'])
end




