"Source: Text/RepThy/Chtr.text";
"Line: 1950";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/Chtr.text, line: 1950
// Example: H100E9 ()
print "Example: H100E9";
ei := GetEchoInput();
SetEchoInput(true);
SetEchoInput(false);
load hs176;
SetEchoInput(true);
T := CharacterTable(G);
Blocks(T,3);
[Degree(T[i]): i in [8, 13, 16]];
BrauerCharacter(T[8], 3);
BrauerCharacter(T[13], 3);
$1 + $2 eq BrauerCharacter(T[16], 3);
assert $1;
T[8] + T[16];
T[13] + T[16];
BrauerCharacter(T[8] + T[16],3);
chi := BrauerCharacter(T[5],3)^2;
chi;
chi_p := BlockProjections(G, chi);
chi_p;
chi_p[3] eq BrauerCharacter(T[8],3) + 2*BrauerCharacter(T[13],3);
SetEchoInput(ei);
