function [out,alphaout]=turbo(in);
% turbo編碼器
% in 為輸入序列，0 1。
g=[1 0 1 1;
   1 1 0 1;];

% 生成矩陣1+d^2+d^3
%        1+d+d^3
% 3GPP標準生成矩陣
[n,K]=size(g);
m=K-1;
nstates=2^m;
%確定狀態數目
puncture=1;
%是否刪余 1 不刪 0 刪
rate=1/(2+puncture);
%編碼率
a=0.8862;
% 信道衰減因子
L_total=length(in)+m;
%幀長
mycount=6;
% 循環迭代次數。
[temp,alpha]=sort(rand(1,L_total));
%得到隨機交織器
en_output=encoderm(in,g,alpha,puncture);
%編碼
alphaout=alpha;
% 交織器輸出
out=en_output;
% 編碼輸出