%
%
  if exist('titleStr') ~= 1
    titleStr = ['; Data Set: ', DirName];
  end
  
  str = [' ',titleStr,' Plotted on ',myDate];
  if( exist('position') ~= 1 ) position = [3 59 1213 1070]; end
  if( exist('fontsize') == 0), fontsize = 20; end
  if( fontsize ==12 ), 
    linewidth = .5;
  else
    linewidth = 1;
  end
  fontweight = 'normal';
  lstr = {};

  if exist( 'thetaBFig' ) ~= 1
    thetaBFig = figure;
    figure(thetaBFig);
  else
    figure(thetaBFig);
  end
  clf
  set( thetaBFig, 'Name', 'ThetaB Plot', 'DeleteFcn', 'clear thetaBFig' );
  set(gcf,'position',position)
  set(gcf,'defaultaxesfontsize',fontsize,'defaulttextfontsize',fontsize)
  set(gcf,'defaultaxesfontsize',fontsize,'defaulttextfontsize',fontsize)
  
  
  set(gca,'fontsize',fontsize,'fontweigh',fontweight)
  set(gca,'ColorOrderIndex',1)

  thetaBminBeam = (dataNav(:,minBeamCnts)-60+dataNav(:,mTheta)*180/pi);
  %
  % Flip the sign in Multibeam.cc instead.
  thetaBLS = dataNav(:,thetaB);
  
  plot(dataNav(:,1), [thetaBminBeam thetaBLS*180/pi]);
  lstr(length(lstr)+1,1) = { 'Minimum Beam Range' };
  lstr(length(lstr)+1,1) = { 'Least Squares Fit' };
  grid on
  hold on
  plot(dataDC(:,1), dataDC(:,dIntegral)*180/pi,'r');
  lstr(length(lstr)+1,1) = { 'Integrator' };
  xlabel('Seconds');
  ylabel('Degrees');
  set(gca,'ylim',[-45 45 ]);
  legend(lstr,'location','best');
