"Source: Text/Basics/ModFld.text";
"Line: 870";
"Date: Tue Jul 21 15:40:20 2020";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Basics/ModFld.text, line: 870
// Example: H29E9 ()
print "Example: H29E9";
ei := GetEchoInput();
SetEchoInput(true);
K11 := RModule(FiniteField(3), 11);
G3 := sub< K11 | 
    [1,0,0,0,0,0,1,1,1,1,1], [0,1,0,0,0,0,0,1,2,2,1],
    [0,0,1,0,0,0,1,0,1,2,2], [0,0,0,1,0,0,2,1,0,1,2],
    [0,0,0,0,1,0,2,2,1,0,1], [0,0,0,0,0,1,1,2,2,1,0] >;
G3; 
Basis(G3); 
f := Morphism(G3, K11);
f;
SetEchoInput(ei);
