git-svn-id: http://moon:8086/svn/matlab/trunk@33 801c6759-fa7c-4059-a304-17956f83a07c
21 lines
369 B
Matlab
21 lines
369 B
Matlab
function cfo_coarse_fract_eval(x, cpoff)
|
|
|
|
N = 1024;
|
|
Ng = 256;
|
|
L = Ng;
|
|
|
|
for d=1:3,
|
|
k = 1;
|
|
Nd = N-2+d;
|
|
for nt=cpoff+1:N+Ng:length(x)-2*N-Ng,
|
|
x1 = x(nt+1:nt+L);
|
|
x2 = x(nt+Nd+1:nt+Nd+L);
|
|
c(k, d) = sum(x1 .* conj(x2));
|
|
k = k + 1;
|
|
end
|
|
end
|
|
domega_f = 1/(2*pi*N) * angle(c)
|
|
|
|
figure(1);
|
|
plot(0:length(c)-1, domega_f*48000); grid;
|