fact: Record Q (alpha:E0) : Prop := mkQ { QA : strict_mono (f_ alpha); QD : dominates_from 2 (f_ (E0_succ alpha)) (f_ alpha); QE : forall beta n, Canon_plus n alpha beta -> f_ beta n <= f_ alpha n}.
imports: hydras(Iterates Simple_LexProd Exp2) hydras(E0 Canon Paths primRec Hprime) Coq(ArithRing Lia) Compat815 Equations(Equations) hydras(primRec)