www.pudn.com > ldpc802.16.rar > test.m, change:2005-11-07,size:714b


clear all 
close all 
 
profile.sys='mcwill'; 
profile.link='uplink'; 
profile.n=2; 
profile.num=6; 
profile.NcarGroup=5; 
profile.Ncar=128; 
profile.Nfft=1024; 
profile.Nused=640; 
profile.Nsubchan=16; 
profile.Nf=8; 
profile.Nt=8; 
 
for i=0:profile.NcarGroup-1, 
    for j=0:profile.Nsubchan-1, 
        SubChanToCar{i+1,j+1}=i*profile.Ncar+j:profile.Nsubchan:(i+1)*profile.Ncar-1; 
    end; 
end; 
 
Allocation=[1,2,3,4,5,1,2,3,4,5,1,2; 
                   1,1,1,1,1,9,9,9,9,9,5,5]; 
 
a=zeros(1,288*2); 
for i=1:288*2 
    a(i)=i; 
end 
p=zeros(1,16*6*2); 
for i=1:16*6*2 
    p(i)=i*(-1); 
end 
 
tt=mapping(a,p,profile,Allocation,SubChanToCar); 
 
[data,pilot]=demapping(tt,profile,Allocation,SubChanToCar);