FUNCTION: LieTools/G2swgt
USAGE: G2swgt(i)
SYNOPSIS:  G2swgt(i) yields the weight of the Cartan-Weyl basis vector g[i] 
   with respect to the basis of simple roots
CAVEATS: requires a previously initialized global Lie algebra environment.
  (See LieTools[gSetup].)
EXAMPLE: 
> LieTools[gSetup](G,2):
  Setting up Gtype = G   rnk = 2
> LieTools[G2swgt](1);

                               [-3, -2]

> LieTools[G2swgt](14);

                                [3, 2]


SEE ALSO: 
