"Source: Text/LieTheory/Cartan.text";
"Line: 525";
"Date: Tue Jun  7 22:27:15 2016";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/LieTheory/Cartan.text, line: 525
// Example: H102E9 ()
print "Example: H102E9";
ei := GetEchoInput();
SetEchoInput(true);
C := Matrix(2,2, [ 2,-2, -2,2 ]);
IsCoxeterIrreducible(C);
assert $1;
IsCrystallographic(C);
assert $1;
IsSimplyLaced(C);
assert not $1;
SetEchoInput(ei);
