proposition: Remark Rem1 : strict_mono (Ack m.+1).
proof: Proof. intros n p H; cbn. destruct Hm as [H1 H2]; apply H1. apply iterate_lt; auto. destruct H2; auto. Qed.
imports: Coq(Lia) Coq(Program.Wf Arith) hydras(ssrnat_extracts) Equations(Equations)