poincareSeries(R,x)
i1 : R=rootSystemA(2) o1 = RootSystem{...8...} o1 : RootSystem
i2 : ZZ[x] o2 = ZZ[x] o2 : PolynomialRing
i3 : poincareSeries(R,x) 3 2 o3 = x + 2x + 2x + 1 o3 : ZZ[x]