%
% PURPOSE: Plot and compare CUR, VEL10 and VEL40 response to a square wave.
% AUTHOR: Rob McEwen
% DATE: 98/11/25
%
  figure(1)
  clf
  sz = size(dataCUR);
  N = sz(1);
  plot(dataCUR(1:N,time),...
     [sgaugeCUR(1:N) sgaugeVEL10(1:N) sgaugeVEL40(1:N) dataCUR(1:N,thrust) ])
  ylabel('Thrust, Newtons')
  xlabel([' Seconds'])
  axis([139 145 -800 800])
  grid on
  title([myDate,' File: ',nameStr,' Bias: ', num2str([biasCUR bias10 bias40])])

  figure(2)
  clf
  plot(dataCUR(1:N,time),...
     [dataCUR(1:N,vel) dataVEL10(1:N,vel) dataVEL40(1:N,vel)])
  ylabel('Omega RPM')
  xlabel([' Seconds'])
  grid on
  axis([139 145 -1500 1500])
  title([myDate,' File: ',nameStr,' Bias: ', num2str([biasCUR bias10 bias40])])
%
% Compute intermediate controller values:
%








