-- -*- M2-comint -*- hash: 13328178502887033120

i1 : d = 5;

i2 : R = wordAlgebra(d); -- create a free associative algebra over Lt_1,..., Lt_d

i3 : a = new Array from for i from 1 to d list i; -- The array [1,...,d]

i4 : f = a_R  -- The word associated to a

o4 = Lt Lt Lt Lt Lt
       1  2  3  4  5

o4 : R

i5 : g = product gens R -- The word Lt_1*...Lt_d

o5 = Lt Lt Lt Lt Lt
       1  2  3  4  5

o5 : R

i6 : f === product gens R

o6 = true

i7 : 
