"Source: Text/RepThy/LieReps.text";
"Line: 1796";
"Date: Fri Nov  8 11:01:29 2019";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/RepThy/LieReps.text, line: 1796
// Example: H111E14 ()
print "Example: H111E14";
ei := GetEchoInput();
SetEchoInput(true);
R := RootDatum("G2");
wts, mults := DominantWeights(R, [1,1]);
wts;
mults;
WeylDimension(R, [1,1]);
[ #WeightOrbit(R,mu : Basis := "Weight") : mu in wts ];
&+[ #WeightOrbit(R,wts[i] : Basis := "Weight")*mults[i] : i in [1..#wts] ];
SetEchoInput(ei);
