`irredcheck_ff'
---------------

irredcheck_ff(POLY)
     :: 1 $BJQ?tB?9`<0$NM-8BBN>e$G$N4{LsH=Dj(B

RETURN
     0|1

POLY
     $BM-8BBN>e$N(B 1 $BJQ?tB?9`<0(B

   * `fff' $B$GDj5A$5$l$F$$$k(B.

   * $BM-8BBN>e$N(B 1 $BJQ?tB?9`<0$N4{LsH=Dj$r9T$$(B, $B4{Ls$N>l9g(B 1, $B$=$l0J30$O(B
     0 $B$rJV$9(B.

     [178] setmod_ff(2^64-95);
     18446744073709551521
     [179] ] F=x^10+random_ff();
     x^10+14687973587364016969
     [180] irredcheck_ff(F);
     1

$B;2>H(B
     *Note `setmod_ff': setmod_ff

