desorts.m

Woven码在TD－SCDMA中的应用仿真程序

function y = desorts(x,row);
    
    y = zeros(size(x));
    len = length(x);
    temp = zeros(len/row,row);   
    switch row
        case 1
            sorts = [1];
        case 2         
            sorts = [1 2];
        case 4
            sorts = [1 3 2 4];
        case 8
            sorts = [1 5 3 7 2 6 4 8];
    end  

    for ii = 1:row
        temp(:,sorts(ii)) = x((ii-1)*len/row+1:ii*len/row).';
    end    
    
    for ii = 1:size(temp,1)
        y((ii-1)*row+1:ii*row) = temp(ii,:);
    end
    
    clear len temp sorts;