"Source: Text/Group/GrpAb.text";
"Line: 2309";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Group/GrpAb.text, line: 2309
// Example: H77E14 ()
print "Example: H77E14";
ei := GetEchoInput();
SetEchoInput(true);
G := AbelianGroup([2, 3]);   
H := AbelianGroup([4, 6]);
A, t := Hom(G, H);
#A;
assert $1 eq 12;
A;
h := t(A.1);
h;
h(G.1);
h(G.2);
assert IsId($1);
I := [<h(G.1), h(G.2)> where h is t(x): x in A];
I;
#I;
assert $1 eq 12;
#Set(I);
assert $1 eq 12;
SetEchoInput(ei);
