fact: Definition reducible (R:CRing)(f:(cpoly_cring R)) := degree_ge_monic R 2%nat f and {g:(cpoly_cring R) | degree_ge_monic R 1%nat g | {h:(cpoly_cring R) | degree_ge_monic R 1%nat h | f[=](cpoly_mult_op R g h) }}.
imports: CoRN.model.Zmod.Zm CoRN.model.rings.Zring CoRN.algebra.CPoly_Degree