fact: Definition eta (j : nat) : cpoly_cring K := \big[(cpoly_mult_cs K)/(cpoly_one K)]_(x_i <- take j s) (cpoly_linear _ ([--] x_i) (cpoly_one _)).
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