interlace.m

实现了通信中交织和解交织过程

function [itrlac_code] = interlace(input,itrlac_width,itrlac_depth)
% itrlac_width 交织宽度,itrlac_depth交织深度
L = length(input);
block_size = itrlac_width*itrlac_depth;
if rem(L,block_size) > 0
    input = [input,zeros(size(1:block_size-rem(L,block_size)))];
end
L = length(input);
n_block = ceil(L/block_size);
temp_block = zeros(itrlac_depth,itrlac_width*n_block);
for i = 1:n_block
    for j = 1:itrlac_depth
        temp_block(j,((i-1)*itrlac_width+1):i*itrlac_width) = ...
            input(1,((i-1)*block_size+1 + (j-1)*itrlac_width):((i-1)*block_size + j*itrlac_width));
    end
end
itrlac_code = reshape(temp_block,1,L);