aboutsummaryrefslogtreecommitdiff
path: root/mathcomp
diff options
context:
space:
mode:
authorReynald Affeldt2021-01-19 01:36:20 +0900
committerReynald Affeldt2021-01-19 01:36:20 +0900
commite1d5e9c2585bad2e9c27a476276761cc71ff9c91 (patch)
treed9c96475a5e055a665e006a8ce2f147d34aea271 /mathcomp
parent35fc6b309a5cc87570255addfd135cb4650ebb43 (diff)
fixes #694
Diffstat (limited to 'mathcomp')
-rw-r--r--mathcomp/algebra/interval.v4
1 files changed, 2 insertions, 2 deletions
diff --git a/mathcomp/algebra/interval.v b/mathcomp/algebra/interval.v
index 4a1cadb..b6964f1 100644
--- a/mathcomp/algebra/interval.v
+++ b/mathcomp/algebra/interval.v
@@ -217,9 +217,9 @@ Proof. by rewrite /<=%O /= lteifxx. Qed.
Lemma bound_ltxx c1 c2 x : (BSide c1 x < BSide c2 x) = (c1 && ~~ c2).
Proof. by rewrite /<%O /= lteifxx. Qed.
-Lemma ge_pinftyE b : (+oo <= b) = (b == +oo). Proof. by move: b => [|[]]. Qed.
+Lemma ge_pinfty b : (+oo <= b) = (b == +oo). Proof. by move: b => [|[]]. Qed.
-Lemma le_ninftyE b : (b <= -oo) = (b == -oo). Proof. by case: b => // - []. Qed.
+Lemma le_ninfty b : (b <= -oo) = (b == -oo). Proof. by case: b => // - []. Qed.
Lemma gt_pinfty b : (+oo < b) = false. Proof. by []. Qed.