fact: Definition N : cpoly_cring K := \big[cpoly_plus_cs K/(cpoly_zero K)]_(j <- (mkseq (fun x => x) (k + 1)) | (fun x => true) j) (_C_ (alpha j) [*] (eta j)).
imports: ssreflect CSetoids CSetoidFun CFields CPolynomials Program Omega Equivalence Morphisms Wf Morphisms CRings CRing_Homomorphisms Rational Setoid CPoly_NthCoeff CPoly_Degree CReals Intervals CauchySeq IntervalFunct MoreIntervals MoreFunctions Composition seq bigopsClass