proposition: Lemma H'_omega_sqr_min : forall k, 0 <> k -> (exp2 (S k) <= H'_ (E0_phi0 2) k)%nat.
proof: Proof. intros k Hk; rewrite H'_omega_sqr. generalize (exp2 (S k)); intro n; destruct n; abstract lia. Qed.
imports: Coq(ArithRing Lia) hydras(E0 Canon Paths) hydras(Exp2 Iterates Simple_LexProd) hydras(Compat815) Equations(Equations)