FUNCTION: Pol2Row - from polynomials to increasing words

CALLING SEQUENCE:

Pol2Row(pol)

FREE[Pol2Row](pol)

PARAMETERS:

pol = any polynomial

SYNOPSIS:

• The Pol2Row function converts a polynomial into an element of the free algebra. Each monomial x.l1 * x.l2 * ... * x.lk is replaced by the increasing word w[l1, l2, ..., lk] (l1 <= l2 <= ... <= lk).

• Whenever there is a conflict between the function name Pol2Row and another name used in the same session, use the long form FREE['Pol2Row'].

EXAMPLES:

> with(FREE):
> Pol2Row(x1*x2^2 + q*x1^5*x7);
 
                      w[1, 2, 2] + q w[1, 1, 1, 1, 1, 7]