FUNCTION: LieTools/SgPolySplit
USAGE: SgPolySplit(gpoly);
SYNOPSIS: SgPolySplit(gpoly) yields a pair [coeffs,monos] of lists
 in which monos is the list of monomials in the variables g[i], i=1..dimg,
 occurring in poly, coeffs is a correlated list of the coefficients of
 these monomials. (The output is the same as that of PolySplit(gpoly,`g`);)
EXAMPLE: 
> gpoly := 3*g[1]^3+2*g[1]^2 + g[1] + 23*g[2]*g[3],g[1]^3;

                      3         2                            3
       gpoly := 3 g[1]  + 2 g[1]  + g[1] + 23 g[3] g[2], g[1]

> SgPolySplit(gpoly);

                                3      2
           [[3, 2, 1, 23], [g[1] , g[1] , g[1], g[3] g[2]]]

SEE ALSO: LieTools[PolySplit], LieTools[UgPolySplit] 
