Miscellaneous tweaks (#6185)

Author: fingolfin

grp/classic.gi

@@ -150,7 +150,7 @@ InstallMethod( GeneralUnitaryGroupCons,
 
        # We use the isomorphism of 'SU(2,q)' and 'SL(2,q)':
        # 'e' is mapped to '-e' under the Frobenius mapping.
-       e:= Z(q^2) - Z(q^2)^q;
+       e:= z - z^q;
        if q = 2 then
          mat1[1,1]:= z;
          mat1[2,2]:= z;
@@ -255,7 +255,7 @@ InstallMethod( SpecialUnitaryGroupCons,
 
          # We use the isomorphism of 'SU(2,q)' and 'SL(2,q)':
          # 'e' is mapped to '-e' under the Frobenius mapping.
-         e:= Z(q^2) - Z(q^2)^q;
+         e:= z - z^q;
          if q <= 3 then
            mat1[1,2]:= e;
            mat2[1,2]:= e;

lib/polyfinf.gi

@@ -755,17 +755,17 @@ local   v,  R,  U,  x,  O,  n,  g,  q,  o,  bas;
       if Length(g[3])=0 and Length(g[4])>0 then
         # in this case `FFPOrderKnownDividend' might run in an infinite
         # recursion.
-  Error("cannot compute order due to limits in the integer factorization!");
+        Error("cannot compute order due to limits in the integer factorization!");
       fi;
       #o := FFPOrderKnownDividend(R,EuclideanRemainder(R,x,g[1]),g[1],g[3]);
       bas:=QuotRemLaurpols(x,g[1],2);
       o := FFPOrderKnownDividend(R,bas,g[1],g[3]);
       if Length(g[4])>0 then
         q:=DegreeOfLaurentPolynomial(PowerMod(bas,o[1],g[1]));
         if not(q=0 or q=DEGREE_ZERO_LAURPOL) then
-  # in fact x^o[1] is not congruent to a constant -- we really need the
-  # primes.
-  Error("cannot compute order due to limits in the integer factorization!");
+          # in fact x^o[1] is not congruent to a constant -- we really need the
+          # primes.
+          Error("cannot compute order due to limits in the integer factorization!");
         fi;
       fi;
       q := Characteristic(CoefficientsRing(R))^g[2];

lib/test.gi

@@ -633,7 +633,8 @@ BindGlobal("DefaultReportDiff", function(inp, expout, found, fnam, line, time)
     Print("# Input is:\n", inp);
     Print("# Expected output:\n", expout);
     Print("# But found:\n", found);
-    Print("########\n");  fi;
+    Print("########\n");
+  fi;
 end);
 
 InstallGlobalFunction("Test", function(arg)