FUNCTION: LieTools/UnBasis2SgBasis
USAGE: UnBasis2SgBasis(Unb,hwv):
SYNOPSIS: UnBasis2SgBasis(Unb,hwv) will produce a polynomial basis 
  the submodule of S[g] generated by a highest weight vector
  hwv in S[g]. The parameter is a list of sequences of
  negative simple roots, whose application to the hwv should
  produce a basis for the representation of g generated from
  hwv.
CAVEATS: requires a previously initialized global Lie algebra environment.
  (See LieTools[gSetup].)
EXAMPLE: 

SEE ALSO: 
