proposition: Theorem F_alpha_mono alpha : strict_mono (F_ alpha).
proof: Proof. now destruct (TH_packed alpha). Qed.
imports: hydras(Iterates Simple_LexProd Exp2) hydras(E0 Canon Paths primRec Hprime) Coq(ArithRing Lia) Compat815 Equations(Equations) hydras(primRec)