proposition: Lemma lt_omega_is_fin alpha: nf alpha -> alpha t2< omega -> is_finite alpha.
proof: Proof. intros N_alpha H; case (lt_omega_inv N_alpha H). destruct x; intro e;rewrite e; simpl; constructor. Qed.
imports: Coq(Arith List Lia Compare_dec Relations Wellfounded RelationClasses) hydras(Epsilon0) hydras(More_Arith Restriction) hydras(ON_Generic) hydras(rpo.term rpo.rpo) hydras(T2) hydras(Compat815)