"Source: Text/Code/CodeLDPC.text";
"Line: 299";
"Date: Thu Sep 25 14:47:47 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Code/CodeLDPC.text, line: 299
// Example: H167E3 ()
print "Example: H167E3";
ei := GetEchoInput();
SetEchoInput(true);
n := 500;
C := RegularLDPCEnsemble(n, 4, 8);
e := 5;
Errs := {};
repeat Include(~Errs, Random(1,n)); until #Errs eq e;
v := Random(C);
ev := AmbientSpace(C)![ (i in Errs) select 1 else 0 : i in [1..n]];
rec_vec := v + ev;
time res := LDPCDecode(C, rec_vec : Channel:="BinarySymmetric", p:=0.2);
res eq v;
assert $1;
SetEchoInput(ei);
