10.5.15 `sffctr'
----------------

sffctr(POLY)
     :: ¿༰ξɸͭξǤδʬ

RETURN
     ꥹ

POLY
     ͭξ ¿༰

   * ¿༰, ꤵƤ뾮ɸͭξǴʬ򤹤.

   * ̤, [[F1,M1],[F2,M2],...] ʤ ꥹȤǤ. , FI 
     monic ʴ, MI Ϥ ʣ٤Ǥ.

     [0] setmod_ff(2,10);
     [2,x^10+x^3+1,x]
     [1] sffctr((z*y^3+z*y)*x^3+(y^5+y^3+z*y^2+z)*x^2+z^11*y*x+z^10*y^3+z^11);
     [[@_0,1],[@_0*z*y*x+@_0*y^3+@_0*z,1],[(@_0*y+@_0)*x+@_0*z^5,2]]


     *Note `setmod_ff': setmod_ff, *Note `modfctr': modfctr.

