proposition: Lemma phi_to_psi_5 : forall beta1 beta2 n gamma, omega t2<= gamma \/ (0 < n)%nat -> [alpha,gcons beta1 beta2 n gamma] = phi alpha (gcons beta1 beta2 n gamma).
proof: Proof. intros; rewrite phi_of_any_cons;auto with T2. 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)