%
%  Name: RPdisp
% 
%  Usage: RPdisp
% 
%   Description: Displays results of RP curve fit
%	

%  Version SWD960809
%
%  Author(s): Scott W. Doebling, doebling@lanl.gov
%
%  Institution: Los Alamos National Laboratory,
%		ESA-EA
%
%  Copyright (c) 1996, The Regents of the University
%     	of California. (See top level of code for
%	full copyright statement.)


ifull=length(Freq);
icountfull=[1:ifull]';

textfull=RPtext(icountfull,Freq,Damp);
set(hedit1,'string',textfull);

inew = length(Freqnew);
icountnew = [1:inew]';

textnew=RPtext(icountnew,Freqnew,Dampnew);
set(hedit2,'string',textnew);

