FUNCTION: LieTools/swgt2E
USAGE: swgt2E(swgt);
SYNOPSIS:  swgt2E(swgt) yields the index of the Cartan-Weyl basis with root swgt (specified
  in terms of the basis of simple roots).
CAVEATS: requires a previously initialized global Lie algebra environment.
  (See LieTools[gSetup].)
EXAMPLE: 
> gSetup(A,2);
Setting up Gtype = A   rnk = 2
> swgt2E([1,1]);

                                  3

SEE ALSO: LieTools[E2swgt]
