diff options
| author | Jasper Hugunin | 2020-10-09 15:58:43 -0700 |
|---|---|---|
| committer | Jasper Hugunin | 2020-10-11 19:05:14 -0700 |
| commit | c35fe7d0526a5b8ab87cbf2ba444f5273c087a99 (patch) | |
| tree | 93ab1418631975002ae9fd48f2ab0fd27ee1ee59 | |
| parent | 6f1e74f0445eae57e81a84bdfadd5f1b1b37a637 (diff) | |
Modify micromega/OrderedRing.v to compile with -mangle-names
| -rw-r--r-- | theories/micromega/OrderedRing.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/theories/micromega/OrderedRing.v b/theories/micromega/OrderedRing.v index ea9b20847b..5fa3740ab1 100644 --- a/theories/micromega/OrderedRing.v +++ b/theories/micromega/OrderedRing.v @@ -235,13 +235,13 @@ Qed. Theorem Rle_lt_trans : forall n m p : R, n <= m -> m < p -> n < p. Proof. intros n m p H1 H2; le_elim H1. -now apply Rlt_trans with (m := m). now rewrite H1. +now apply (Rlt_trans (m := m)). now rewrite H1. Qed. Theorem Rlt_le_trans : forall n m p : R, n < m -> m <= p -> n < p. Proof. intros n m p H1 H2; le_elim H2. -now apply Rlt_trans with (m := m). now rewrite <- H2. +now apply (Rlt_trans (m := m)). now rewrite <- H2. Qed. Theorem Rle_gt_cases : forall n m : R, n <= m \/ m < n. |