StagedTrees(L: LIST of power-products): IDEAL

/**/  use QQ[a,b,x,y,z,w];
/**/  c_T := a*(x*(z+w)+y) + b*(x+y);
/**/  trees := StagedTrees(c_T);
/**/  PrintTrees(trees);
-- number of trees = 2 -----------------------
-------- tree 1 ----------------------------------
-- florets: [[x, y], [a, b], [z, w]]
< 
 x < 
      a < 
           z 
           w 
      b 
 y < 
      a 
      b 
-------- tree 2 ----------------------------------
-- florets: [[a, b], [x, y], [z, w]]
< 
 a < 
      x < 
           z 
           w 
      y 
 b < 
      x 
      y 
-------- end trees -------------------------------