"Source: Text/Code/CodeRng.text";
"Line: 745";
"Date: Tue Nov  5 09:08:43 2019";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Code/CodeRng.text, line: 745
// Example: H168E8 ()
print "Example: H168E8";
ei := GetEchoInput();
SetEchoInput(true);
Z4 := IntegerRing(4);
K8 := LinearCode< Z4, 8 |
    [1,1,1,1,1,1,1,1],
    [0,2,0,0,0,0,0,2],
    [0,0,2,0,0,0,0,2],
    [0,0,0,2,0,0,0,2],
    [0,0,0,0,2,0,0,2],
    [0,0,0,0,0,2,0,2],
    [0,0,0,0,0,0,2,2]>;
K8;
IsCyclic(K8);
assert $1;
IsSelfDual(K8);
assert $1;
K8 eq Dual(K8);
assert $1;
SetEchoInput(ei);
