%TE 無迭代的子程序
%copyright:flyingxiang
function [bits_trans,simb_cod,Ldc0,Ldb0, Lec_deint,y,numero,taxa]=it0_512(var)

%初始化程序,即類似與分離的均衡和信道譯碼

K=3;
g1=[1 1 1];g2=[1 0 1];
bits_trans=randint(1,512);%傳輸數據
%信道編碼------卷積碼編碼
simb_cod=conven(K,g1,g2,bits_trans);
simb_cod=simb_cod(1:1024);
%交織器
simb_cod_int=int1000(simb_cod);



%經過信道生成輸出
h=[.407 .815 .407];amp=1;
[y]=canal2(simb_cod_int,h,var,amp);

%經過均衡器------MAP算法

[Lec,saidaequa]=Lblocoequa(y,var);   
%解交織
Lec_deint=deint1000(Lec);


%生成進入譯碼器的先驗信息
[C0,C1]=converte(Lec_deint);


%信道譯碼------MAP算法
[Ldb0,Ldc0]=appv3(C1,C0,Lec_deint);

[numero,taxa]=erro1000(Ldb0,bits_trans);