"Source: Text/Module/ModRng.text";
"Line: 1700";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Module/ModRng.text, line: 1700
// Example: H60E10 ()
print "Example: H60E10";
ei := GetEchoInput();
SetEchoInput(true);
Q  := RationalField();
R4 := RModule(Q, 4);
M  := EndomorphismAlgebra(R4);
h4 := M ! [ 1/i :  i in [1 .. 16 ] ];
h4;
SetEchoInput(ei);
