fact: Definition alpha (j : nat) : K := dd (rev (take (j + 1) s)) ((rev_fresh_seq K (take (j + 1) s)) (take_fresh_seq K (j + 1) s fresh_s)).
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