Home > WaveComBox > Example > FBMC_OQAM > JointPreEqualizationAndEqualization.m

JointPreEqualizationAndEqualization

PURPOSE ^

Joint equalization at TX and RX for MIMO FBMC-OQAM system

SYNOPSIS ^

This is a script file.

DESCRIPTION ^

 Joint equalization at TX and RX for MIMO FBMC-OQAM system

 Example showing how to jointly equalize the channel at the transmitter
 and receiver of a MIMO FBMC-OQAM system under frequency selective
 channel.

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 % Joint equalization at TX and RX for MIMO FBMC-OQAM system
0002 %
0003 % Example showing how to jointly equalize the channel at the transmitter
0004 % and receiver of a MIMO FBMC-OQAM system under frequency selective
0005 % channel.
0006 
0007 % This file is part of WaveComBox: www.wavecombox.com and is distributed under
0008 % the terms of the MIT license. See accompanying LICENSE file.
0009 % Original author: François Rottenberg, May 8, 2018.
0010 % Contributors:
0011 % Change log:
0012 
0013 % Definition of general Parameters
0014 Para=InitializeChainParameters( 'FBMC-OQAM' ) % initialize parameters of the FBMC-OQAM chain
0015 Para.ActiveSubcarriers= 3:Para.nSubcarriers;
0016 Para.M_PAM=2;
0017 Para.Ns=2000;
0018 Para.N_T=2;
0019 Para.N_R=2;
0020 Para.S=2;
0021 Para.Es_N0_dB=15;
0022 
0023 % Transmitter
0024 d = GenerateData (Para); % Generate real PAM symbols
0025 % Channel
0026 C=GenerateRayleighChannelReal('ITU_VehA', Para); % We assume the transmitter perfectly knows the channel
0027 % Pre-equalizer
0028 ParaPreEqualizer.criterion='SVD';
0029 [ d_tilde, A, B ] = PreEqualizer( d, C, Para, 'SingleTap', ParaPreEqualizer );
0030 s = Modulator(d_tilde, Para ); % FBMC-OQAM modulation
0031 
0032 % Channel
0033 r = Channel_Multipath( s, C ); % Multipath channel
0034 r=Channel_AWGN( r, Para ); % AWGN channel, SNR fixed in Para
0035 
0036 % Receiver
0037 z = Demodulator( r, Para ); % FBMC demodulation
0038 % Equalizer
0039 ParaEqualizer.criterion='Specific';
0040 ParaEqualizer.B=B;
0041 [ x, B ] = Equalizer( z, C, Para, 'SingleTap', ParaEqualizer );
0042 d_hat=real(x);
0043 MSE = MSEComputes( d, d_hat, Para );
0044 
0045 
0046 figure
0047 plot(Para.ActiveSubcarriers, 10*log10(MSE),'-xb','markersize',8,'linewidth',1.5)
0048 hold on
0049 xlabel('Subcarrier index')
0050 ylabel('MSE [dB]')
0051 xlim([min(Para.ActiveSubcarriers) max(Para.ActiveSubcarriers)])

Generated on Mon 14-Oct-2019 13:48:34 by m2html © 2005