diff options
| author | Jasper Hugunin | 2020-10-08 17:01:48 -0700 |
|---|---|---|
| committer | Jasper Hugunin | 2020-10-08 17:01:48 -0700 |
| commit | 9a55d469042cef943dd0be20083896741a1c5dcc (patch) | |
| tree | e85520aa1ab197e32c5a207185a63af635bc90c1 | |
| parent | d0be4a3dc582f675b2deecbaffab7f09f4f621cf (diff) | |
Modify Numbers/Integer/Abstract/ZAddOrder.v to compile with -mangle-names
| -rw-r--r-- | theories/Numbers/Integer/Abstract/ZAddOrder.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/theories/Numbers/Integer/Abstract/ZAddOrder.v b/theories/Numbers/Integer/Abstract/ZAddOrder.v index 40a37be5f9..5a293c6483 100644 --- a/theories/Numbers/Integer/Abstract/ZAddOrder.v +++ b/theories/Numbers/Integer/Abstract/ZAddOrder.v @@ -241,25 +241,25 @@ Qed. Theorem sub_neg_cases : forall n m, n - m < 0 -> n < 0 \/ 0 < m. Proof. -intros. +intros n m ?. rewrite <- (opp_neg_pos m). apply add_neg_cases. now rewrite add_opp_r. Qed. Theorem sub_pos_cases : forall n m, 0 < n - m -> 0 < n \/ m < 0. Proof. -intros. +intros n m ?. rewrite <- (opp_pos_neg m). apply add_pos_cases. now rewrite add_opp_r. Qed. Theorem sub_nonpos_cases : forall n m, n - m <= 0 -> n <= 0 \/ 0 <= m. Proof. -intros. +intros n m ?. rewrite <- (opp_nonpos_nonneg m). apply add_nonpos_cases. now rewrite add_opp_r. Qed. Theorem sub_nonneg_cases : forall n m, 0 <= n - m -> 0 <= n \/ m <= 0. Proof. -intros. +intros n m ?. rewrite <- (opp_nonneg_nonpos m). apply add_nonneg_cases. now rewrite add_opp_r. Qed. |
