"Source: Text/Geometry/ModAbVar.text";
"Line: 4248";
"Date: Fri Sep  9 15:10:23 2022";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/ModAbVar.text, line: 4248
// Example: H145E66 ()
print "Example: H145E66";
ei := GetEchoInput();
SetEchoInput(true);
function ind(N) 
   H := HeckeAlgebra(JZero(N)); 
   return Index(Saturation(H),H); 
end function;
for N in [2..60] do 
   i := ind(N);  
   if i gt 1 then N, i; end if;
end for;
SetEchoInput(ei);
