Skip to content
Snippets Groups Projects
Commit c35a5da4 authored by Björn Brandenburg's avatar Björn Brandenburg
Browse files

fixup! Prepare subdnD for MathComp PR

parent 2f13c730
No related branches found
No related tags found
No related merge requests found
......@@ -6,9 +6,9 @@ Require Export prosa.util.tactics.
(** Additional lemmas about natural numbers. *)
Section NatLemmas.
(** First, we show that, given [m1 >= m2] and [n1 >= n2], an
expression [(m1 + n1) - (m2 + n2)] can be transformed into
expression [(m1 - m2) + (n1 - n2)]. *)
(** First, we show that, given [m >= p] and [n >= q], an
expression [(m + n) - (p + q)] can be transformed into
expression [(m - p) + (n - q)]. *)
Lemma subnACA m n p q : p <= m -> q <= n ->
(m + n) - (p + q) = (m - p) + (n - q).
Proof. by move=> plem qlen; rewrite subnDA addnBAC// addnBA// subnAC. Qed.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment