`gr', `grm', `hgr', `hgrm'
--------------------------

gr(PLIST,VLIST)
grm(PLIST,VLIST)
hgr(PLIST,VLIST)
hgrm(PLIST,VLIST)
     :: OuǐvZ

RETURN
     Xg
PLIST, VLIST
     Xg

   * WCu `gr' Œ`Ă.
   * , Xg PLIST , ϐ VLIST ɊւOui
     ߂.
   * VLIST ͕s茳̃Xg. VLIST ɌȂs茳, Ŵɑ
     ƌȂ.
   * `grm()', `hgrm()' ̓WZp, `hgr()' `hgrm()' 
     ͐Ďp艻s.
   * ϐ^, ϐ `Ord' ̒lp.
   * LƐꍇɂ, `grm()', `hgrm()' L.

     [0] load("gr")$
     [44] Ord=2$
     [45] load("cyclic")$
     [55] P=cyclic(5);        
     [c4*c3*c2*c1*c0-1,(((c3+c4)*c2+c4*c3)*c1+c4*c3*c2)*c0+c4*c3*c2*c1,
     ((c2+c4)*c1+c4*c3)*c0+c3*c2*c1+c4*c3*c2,(c1+c4)*c0+c2*c1+c3*c2+c4*c3,
     c0+c1+c2+c3+c4]
     [56] G=grm(P,[c0,c1,c2,c3,c4]);
     [c0+c1+c2+c3+c4,...]

Q
     `Ord'

