testtv_ceintratile.m

OFDMA 物理层开发的matlab 源码.飞思卡尔提供.对物理层开发的工程师有帮助!

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%  Property of Freescale
%  Freescale Confidential Proprietary
%  Freescale Copyright (C) 2005 All rights reserved
%  ----------------------------------------------------------------------------
%  $RCSfile: testTV_CEIntraTile.m.rca $
%  Tag $Name:  $
%  $Revision: 1.3 $
%  $Date: Thu Jan  4 14:48:09 2007 $
%  Target: Matlab
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%-- This function test the generation of random TV from mCEIntraTile
%
%       function testTV_CEIntraTile(seed)
%
% input:
% seed : (double), random seed
%
% Note: for a good use of mGenBin, make sure your files are not "read only"


%-- Matlab files used by this file
% mCEIntraTile
% mGenBin
% mGenHeader
%-- End of list

function testTV_CEIntraTile(seed)

clear global
clear functions
close all

profile off

addpath('../');
addpath('../../../../../../../SP/CM/matlab');

ntile = 6;
dataSize = ntile * 2;
fname = 'CEIntraTile';
Q = 15;

if (exist('seed','var') == 0)
    seed = sum(100*clock);
end
rand('state',seed);

system(['del ..\..\vector\log\TCRND\',fname,'.txt']);
diary(['../../vector/log/TCRND/',fname,'.txt']);

disp('CEIntraTile Simulation');
disp('=====================================');
disp(' ');
%%%%%%%%%%%%%%%%%%%%%% Initialize Paramters %%%%%%%%%%%%%%%%%%%%%%%%%%%
disp('*********Initializing Parameters*********')
disp(strcat('SEED = ',num2str(seed)));

% generates pilot random data , include the 4/3 Pilot boosting
pilot1real = round((2^(Q+1)-1).*rand(1,dataSize)-2^Q);
pilot1imag = round((2^(Q+1)-1).*rand(1,dataSize)-2^Q);
pilot1 = pilot1real + pilot1imag*i;
pilot3real = round((2^(Q+1)-1).*rand(1,dataSize)-2^Q);
pilot3imag = round((2^(Q+1)-1).*rand(1,dataSize)-2^Q);
pilot3 = pilot3real + pilot3imag*i;

ChanEst = mCEIntraTile(ntile,pilot1,pilot3);

%ChanEst = ChanEst * 2^16;

mGenBin([pilot1 pilot3],'../../vector/in/TCRND/IF2dRXPlt_RND_RND_RND_RND.lod','int16','1R1I','b');
mGenBin(ChanEst,'../../vector/ref/TCRND/IF2cRXCtrl_RND_RND_RND_RND.lod','int32','1R1I','b');

mGenHeader([pilot1 pilot3],'../../vector/in/TCRND/IF2dRXPlt_RND_RND_RND_RND.h','int16','short int gasiPilot');
mGenHeader(ChanEst,'../../vector/ref/TCRND/IF2cRXCtrl_RND_RND_RND_RND.h','int32','long int galiRefResponse');

diary off

rmpath('../');
rmpath('../../../../../../../SP/CM/matlab');