sorts.m

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

function y = sorts(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:len/row;
        temp(ii,:) = x((ii-1)*row+1:ii*row);
    end    
    
    for ii = 1:size(sorts,2)
        y((ii-1)*len/row+1:ii*len/row) = temp(:,sorts(ii));
    end
    
    clear len temp sorts ;