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