"Source: Text/Code/CodeFld.text";
"Line: 1657";
"Date: Thu Sep 25 14:47:47 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Code/CodeFld.text, line: 1657
// Example: H165E18 ()
print "Example: H165E18";
ei := GetEchoInput();
SetEchoInput(true);
C := CordaroWagnerCode(6);
C;
IsSelfOrthogonal(C);
assert $1;
D := Dual(C);
D;
C subset D;
assert $1;
SetEchoInput(ei);
