"Source: Text/Code/CodeFld.text";
"Line: 628";
"Date: Tue May 30 11:26:03 2023";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Code/CodeFld.text, line: 628
// Example: H161E8 ()
print "Example: H161E8";
ei := GetEchoInput();
SetEchoInput(true);
R := ReedMullerCode(1, 3);
R;
G := GeneratorMatrix(R);
P := ParityCheckMatrix(R);
P;                                                                           
G * Transpose(P);
D := LinearCode(P);
Dual(R) eq D;
assert $1;
SetEchoInput(ei);
