`gr_minipoly', `minipoly'
-------------------------

gr_minipoly(PLIST,VLIST,ORDER,POLY,V,HOMO)
     :: $BB?9`<0$N(B, $B%$%G%"%k$rK!$H$7$?:G>.B?9`<0$N7W;;(B

minipoly(PLIST,VLIST,ORDER,POLY,V)
     :: $B%0%l%V%J4pDl$rF~NO$H$9$k(B, $BB?9`<0$N:G>.B?9`<0$N7W;;(B

RETURN
     $BB?9`<0(B

PLIST, VLIST
     $B%j%9%H(B

ORDER
     $B?t(B, $B%j%9%H$^$?$O9TNs(B

POLY
     $BB?9`<0(B

V
     $BITDj85(B

HOMO
     $B%U%i%0(B

   * `gr_minipoly()' $B$O%0%l%V%J4pDl$N7W;;$+$i9T$$(B, `minipoly()' $B$O(B
     $BF~NO$r%0%l%V%J4pDl$H$_$J$9(B.

   * $B%$%G%"%k(B I $B$,BN(B K $B>e$NB?9`<04D(B K[X] $B$N(B 0 $B<!85%$%G%"%k$N;~(B, K[V]
     $B$N85(B f(V) $B$K(B f(P) mod I $B$rBP1~$5$;$k(B $B4D=`F17?$N3K$O(B 0
     $B$G$J$$B?9`<0$K$h$j@8@.$5$l$k(B. $B$3$N@8@.85$r(B P $B$N(B, $BK!(B I
     $B$G$N:G>.B?9`<0$H8F$V(B.

   * `gr_minipoly()', `minipoly()' $B$O(B, $BB?9`<0(B P $B$N:G>.B?9`<0(B $B$r5a$a(B, V
     $B$rJQ?t$H$9$kB?9`<0$H$7$FJV$9(B.

   * $B:G>.B?9`<0$O(B, $B%0%l%V%J4pDl$N(B 1 $B$D$N85$H$7$F7W;;$9$k$3$H$b$G$-$k$,(B,
     $B:G>.B?9`<0$N$_$r5a$a$?$$>l9g(B, `minipoly()', `gr_minipoly()' $B$O(B
     $B%0%l%V%J4pDl$rMQ$$$kJ}K!$KHf$Y$F8zN($,$h$$(B.

   * `gr_minipoly()' $B$K;XDj$9$k9`=g=x$H$7$F$O(B, $BDL>oA4<!?t5U<-=q<0=g=x$r(B
     $BMQ$$$k(B.

     [117] G=tolex(G0,V,0,V)$
     43.818sec + gc : 11.202sec
     [118] GSL=tolex_gsl(G0,V,0,V)$
     17.123sec + gc : 2.590sec
     [119] MP=minipoly(G0,V,0,u0,z)$
     4.370sec + gc : 780msec

$B;2>H(B
     *Note `lex_hensel lex_tl tolex tolex_d tolex_tl': lex_hensel
     lex_tl tolex tolex_d tolex_tl.

