%
%  This file processes the data
%
function data = process_data_1dof;
%
%  enter the data as 
%       frequency        input (in cm/degrees)    output amplitude (in cm/degrees); 
%
%  such as 
%
%  measured = [1.00 1.50 1.740;
%              2.00 1.50 2300;
%              2.50 0.50 1100];
%

  measured = [ ];
%
%  Be sure the rows are sorted by frequency
%
   measured = sortrows(measured,1);
%
%  get the magnitude of the transfer function
%
  H = measured(:,3)./measured(:,2);
  f = measured(:,1); 
  data = [f H];
%
  return;