test_meqzf.m

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

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%  Property of Freescale
%  Freescale Confidential Proprietary
%  Freescale Copyright (C) 2005 All rights reserved
%  ----------------------------------------------------------------------------
%  $RCSfile: test_mEqZF.m.rca $
%  Tag $Name:  $
%  $Revision: 1.1 $
%  $Date: Mon Oct 30 15:05:29 2006 $
%  Target: Matlab
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%-- Matlab files used by this file
% mEqZF
%-- End of list


function status = test_mEqZF

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

ModuleName = 'mEqZF';
disp(['Testing ' ModuleName ' ... ']);

%-- General Settings
Q = 15;

%-- Test vectors, 1st col input, 2nd col Ctrl, 3rd ref
TV = { ...
    'IF2cRX_RND_RND_RND_RND.lod' 'IF2cRXCtrl_RND_RND_RND_RND.lod' 'IF2bRX_RND_RND_RND_RND.lod';
    };


%-- Loop over the TV
for i=1:size(TV,1)

    %-- Load stimuli
    In= mGetBin(['../../vector/in/TCRND/' TV{i,1} ],'int16','1R1I','b');
    ChanEst = mGetBin(['../../vector/in/TCRND/' TV{i,2} ],'int32','1R1I','b');
    Ref = mGetBin(['../../vector/ref/TCRND/' TV{i,3}],'int16','1R1I','b');

    %-- Call function
    Out = mEqZF(In,ChanEst);
    Out_fixed = round(Out.*2^Q);

    %-- Compare
    result = any(Out_fixed-double(Ref) );
    if any(result)
        disp(['Error: Matlab function failed for ' TV{i,1}  ]);
    else
        disp(['OK: Matlab function succeeded for ' TV{i,1}  ]);
    end

end


if any([result ])
    disp(['Error: Matlab function ' ModuleName ' failed.' ]);
    status = -1 ;
else
    disp(['OK: Matlab function ' ModuleName ' succeeded.'  ]);
    status = 1;
end


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