"Source: Text/Algebra/AlgInv.text";
"Line: 799";
"Date: Tue Feb 25 10:14:52 2020";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Algebra/AlgInv.text, line: 799
// Example: H96E8 ()
print "Example: H96E8";
ei := GetEchoInput();
SetEchoInput(true);
K := GF(5);
G1 := SmallGroup(8, 3);
G2 := SmallGroup(8, 4);
A1 := GroupAlgebraAsStarAlgebra(K, G1);
A2 := GroupAlgebraAsStarAlgebra(K, G2);
J1, T1 := TaftDecomposition(A1);
J2, T2 := TaftDecomposition(A2);
Dimension(J1); Dimension(J2);
RecogniseStarAlgebra(A1);
assert $1;
RecogniseStarAlgebra(A2);
assert $1;
SimpleParameters(A1);
SimpleParameters(A2);
SetEchoInput(ei);
