computeoptimalstepr.m

matlab的源程序

function [Step] = ComputeOptimalStep(r1,r2,FreqCycl)
%
% [Step] = ComputeOptimalStep(g,y)
%
% This function compute the optimal step. 
%
%
% Author : Pierre JALLON
% Date of creation : 04/23/2005
% Date of last modification : 04/23/20005
%

Longueurr = length(r1);
module_carre_r2 = abs(r2).^2;
module_carre_r1 = abs(r1).^2;
reel_r1_r2 = real(conj(r1).*r2);

carre_r2 = r2.^2;
carre_r1 = r1.^2;
r1_r2 = r1.*r2;

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Le num閞ateur               %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%P1 correspond