FUNCTIONS: LieTools/CW2swgt
USAGE: CW2swgt(cwgt,Gt); CW2swgt(cwgt); CW2swgt(cwgt,Gtype,rnk)
SYNOPSIS: CW2swgt(cwgt,Gt) takes an argument of the form
      3*e1 + 2*e2 + ...
  (the way the Coxeter/Weyl package expresses weights) and produces a list
  of the components of the corresponding weight with respect to the basis of
  simple roots of Gt. 
  CW2swgt called with a single argument, cwgt, do the same
  thing but requires a previously initialized global Lie algebra environment.
  (See LieTools[gSetup].)  
  One can also call CW2swgt in the form CW2swgt(cwgt,Gtype,rnk).

  swgt2CW is the inverse of CW2swgt: i.e. it converts the expression of a 
  weight as a list of its components with respect to a basis of
  simple roots to a linear function of the standard basis elements e1,e2...
  used by the Coxeter/Weyl package.


EXAMPLE: 
> sw := LieTools[CW2swgt](e1-e3,A2);

                             sw := [1, 1]

> cw := LieTools[swgt2CW](sw,A2);

                            cw := e1 - e3


SEE ALSO: LieTools[swgt2CW], LieTools[CW2fwgt], LieTools[fwgt2CW],  LieTools[fwgt2swgt],
          LieTools[swgt2fwgt]    
