
0080 <span class="comment">%            fprintf('\n');</span>
0081 <span class="comment">%        end;</span>
0082        datafit(:,ch)=exp(i*2*pi*(0:N-1)'*fsig/Fs)*A(fmax(ch).loc,ch)+exp(-i*2*pi*(0:N-1)'*fsig/Fs)*conj(A(fmax(ch).loc,ch));
0083    <span class="keyword">end</span>;
0084 <span class="keyword">else</span>
0085    indx = zeros( length(f0) );
0086    <span class="keyword">for</span> n=1:length(f0);
0087        [fsig,indx(n)]=min(abs(f-f0(n)));
0088    <span class="keyword">end</span>;
