`gb_comp'
---------

gb_comp(PLIST1, PLIST2)
     :: 多項式リストが, 符号を除いて集合として等しいかどうか調べる.

RETURN 0 または 1

PLIST1  PLIST2

   * PLIST1, PLIST2 について, 符号を除いて集合として等しいかどうか
     調べる.

   * 異なる方法で求めたグレブナ基底は, 基底の順序,
     符号が異なる場合があり, それらが等しいかどうかを調べるために用いる.

     [243] C=cyclic(6)$
     [244] V=[c0,c1,c2,c3,c4,c5]$
     [245] G0=gr(C,V,0)$
     [246] G=tolex(G0,V,0,V)$
     [247] GG=lex_tl(C,V,0,V,0)$
     [248] gb_comp(G,GG);
     1

