fact: Definition call_lt (c c' : E0 * nat) := lexico E0lt (Peano.lt) c c'.
imports: hydras(Iterates Simple_LexProd Exp2) hydras(E0 Canon Paths primRec Hprime) Coq(ArithRing Lia) Compat815 Equations(Equations) hydras(primRec)