dynkinType(D)
i1 : R=rootSystemE(6)++rootSystemA(4)++rootSystemB(3)++rootSystemA(4);
i2 : D=dynkinDiagram(R);
i3 : dynkinType(D) o3 = DynkinType{{A, 4}, {A, 4}, {B, 3}, {E, 6}} o3 : DynkinType