gusucode.com > m4k20功率分配图 mimo功率优化,OFDM典型仿真程序，贪婪算法仿真程序 > code/test_16qam/cecompensation.m

    %-------------- Fading compensation by CE symbol --------------
function [icompen,qcompen,h] = cecompensation (ch2,ch7,ce)
%If you would like to simulate performance under CE-based compensation, please remove "*"
%in this area
%
%没有STBC的情况下的补偿
% preparation known CE data
ich7=real(ch7);
qch7=imag(ch7);
ce=1;
ce0=ch2(:,ce);
ice0=real(ce0);
qce0=imag(ce0);
% taking CE data out of received data
ce1=ch7(:,ce);
ice1=real(ce1);
qce1=imag(ce1);

% calculating reverse rotation 
iv=real((1./(ice1.^2+qce1.^2)).*(ice0+i.*qce0).*(ice1-i.*qce1));
qv=imag((1./(ice1.^2+qce1.^2)).*(ice0+i.*qce0).*(ice1-i.*qce1));

% matrix for reverse rotation
ieqv1=[iv iv iv iv iv iv iv];
qeqv1=[qv qv qv qv qv qv qv];

% reverse rotation
icompen=real((ich7+i.*qch7).*(ieqv1+i.*qeqv1));
qcompen=imag((ich7+i.*qch7).*(ieqv1+i.*qeqv1));
h=1./(ieqv1+i.*qeqv1);
%ich7=icompen;
%qch7=qcompen;