inter_weave_8.m

依据GSM 05.03建议

%交织度为8的交织
function u=INTER_WEAVE_8(d,flag)
if nargin==1
   flag=1;
end
N=length(d)/456;
C=reshape(d,456,N);
C=C';
u=zeros(4*N+4,114);
for n=1:N
	for k=0:455
   	b=mod(k,8)+4*(n-1);
   	j=2*mod(49*k,57)+floor(mod(k,8)/4);
      u(b+1,j+1)=C(n,k+1);
   end
end
u=reshape(u',1,4*114*(N+1));