interstm4.m

Matlab实现SONET/SDH光通信系统simulink仿真程序源代码

              %**********************************************
              %* Multiplexa bit a bit 3 STM-1 en un STM-4   * 
              %**********************************************

%   1 -----)\              
%   2 -----) \
%   3 -----) / --- ... columnas 4 3 2 1
%   4 -----)/          

function [STM4]=interSTM4(u)



[r,t]=size(u);
e=zeros(r,t);
s=1;
i=1;
while i<=(t)
   e(:,i)=u(:,s);
   i=i+1;
   e(:,i)=u(:,s+2160);
   i=i+1;
   e(:,i)=u(:,s+4320);
   i=i+1;
   e(:,i)=u(:,s+6480);
   i=i+1;
   s=s+1;
   STM4=e;
end

end