aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-09-10 11:17:43 +0200
committerPierre-Marie Pédrot2019-09-10 11:17:43 +0200
commitf06f4174b1b0b864328944e1f35b4745d8a012af (patch)
tree267359921bc2ef9ebe7ddfc0235e0fee4a35bc60
parent02d9b435cfd0f688a3ace6fd0aefbf02f5102f5b (diff)
parentee02c17a2e8a10c4f6f6b47e8875f2f9b1a3d42f (diff)
Merge PR #9406: [stdlib] Do not put INR_eq in the “real” hint database
Reviewed-by: silene
-rw-r--r--test-suite/output/NoAxiomFromR.out1
-rw-r--r--test-suite/output/NoAxiomFromR.v10
-rw-r--r--theories/Reals/RIneq.v1
3 files changed, 11 insertions, 1 deletions
diff --git a/test-suite/output/NoAxiomFromR.out b/test-suite/output/NoAxiomFromR.out
new file mode 100644
index 0000000000..7d7c521343
--- /dev/null
+++ b/test-suite/output/NoAxiomFromR.out
@@ -0,0 +1 @@
+Closed under the global context
diff --git a/test-suite/output/NoAxiomFromR.v b/test-suite/output/NoAxiomFromR.v
new file mode 100644
index 0000000000..9cf6879699
--- /dev/null
+++ b/test-suite/output/NoAxiomFromR.v
@@ -0,0 +1,10 @@
+Require Import Psatz.
+
+Inductive TT : Set :=
+| C : nat -> TT.
+
+Lemma lem4 : forall (n m : nat),
+S m <= m -> C (S m) <> C n -> False.
+Proof. firstorder. Qed.
+
+Print Assumptions lem4.
diff --git a/theories/Reals/RIneq.v b/theories/Reals/RIneq.v
index 75298855b2..3b108b485a 100644
--- a/theories/Reals/RIneq.v
+++ b/theories/Reals/RIneq.v
@@ -1692,7 +1692,6 @@ Proof.
exact H.
now apply not_INR in H.
Qed.
-Hint Resolve INR_eq: real.
Lemma INR_le : forall n m:nat, INR n <= INR m -> (n <= m)%nat.
Proof.