interleaver.m

来自「AWGN信道下高斯噪声干扰下GALILEO编码译码系统性能仿真」· M 代码 · 共 15 行

function source_out=interleaver(source_in)
%rem是求余数
%按列写，按行读
interleaver_length=30;

cols=8; %一帧转成列矩阵后的列数
theLastRowOfLastCol= 30;  %最后一列的最后一行

for n=1:240       
    theCol=fix((n-1)/interleaver_length) +1 ;
    theRow=rem(n-1,interleaver_length) +1;
    index=(theRow -1) * cols + theCol;
    source_out(index)= source_in(n);
end