proposition: Lemma F_iterate_rw n p : F_ (S n) (S p) = iterate (F_ n) (S (S p)) (S p).
proof: Proof. rewrite <- FinS_eq, FinS_Succ_eq; now rewrite F_succ_eqn. Qed.
imports: hydras(Iterates F_alpha E0 Ack AckNotPR) Coq(ArithRing Lia Arith)