-- -*- M2-comint -*- {* hash: -1321302346 *}

i1 : R = QQ[x1,x2,x3];

i2 : M = matrix {{ x1*x2*x3, x2^2*x3, x1*x2*x3^2 }};

             1       3
o2 : Matrix R  <--- R

i3 : pommaretMultVar M

o3 = {set {x3}, set {x3}, set {x3}}

o3 : List

i4 :