"Source: Text/LieTheory/Cartan.text";
"Line: 627";
"Date: Tue Jun  7 22:27:15 2016";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/LieTheory/Cartan.text, line: 627
// Example: H102E10 ()
print "Example: H102E10";
ei := GetEchoInput();
SetEchoInput(true);
D := Digraph< 4 | <1,{2,3,4}>, <2,{1}>, <3,{1}>, <4,{1}> >;
AssignLabel(D, 1,2, 2);
AssignLabel(D, 1,3, 5);
IsDynkinDigraph(D);
assert $1;
CartanMatrix(D);
FundamentalGroup(D);
SetEchoInput(ei);
