FUNCTION: LieTools/DiagXonSgMonoSet
USAGE: DiagXonSgMonoSet(X,mlist);
SYNOPSIS: This is a routine to find the eigenvalues and eigenvectors
  of an element X of g  on a list of monomials of fixed weight and degree.
CAVEATS: requires a previously initialized global Lie algebra environment.
  (See LieTools[gSetup].)
EXAMPLE: 
> LieTools[gSetup](A,2);
Setting up Gtype = A   rnk = 2
> mlist := [g[8]*g[4], g[8]*g[5], g[7]*g[6], g[8]^2];

                                                         2
          mlist := [g[8] g[4], g[8] g[5], g[7] g[6], g[8] ]

> LieTools[DiagXonSgMonoSet](g[4],mlist);

  [[1, 3, {[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0]}],

        [2, 1, {[0, 0, 0, 1]}]]

SEE ALSO: 
