summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/shouldsucceed/1774.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/shouldsucceed/1774.v')
-rw-r--r--test-suite/bugs/closed/shouldsucceed/1774.v18
1 files changed, 0 insertions, 18 deletions
diff --git a/test-suite/bugs/closed/shouldsucceed/1774.v b/test-suite/bugs/closed/shouldsucceed/1774.v
deleted file mode 100644
index 4c24b481..00000000
--- a/test-suite/bugs/closed/shouldsucceed/1774.v
+++ /dev/null
@@ -1,18 +0,0 @@
-Axiom pl : (nat -> Prop) -> (nat -> Prop) -> (nat -> Prop).
-Axiom plImp : forall k P Q,
- pl P Q k -> forall (P':nat -> Prop),
- (forall k', P k' -> P' k') -> forall (Q':nat -> Prop),
- (forall k', Q k' -> Q' k') ->
- pl P' Q' k.
-
-Definition nexists (P:nat -> nat -> Prop) : nat -> Prop :=
- fun k' => exists k, P k k'.
-
-Goal forall k (A:nat -> nat -> Prop) (B:nat -> Prop),
- pl (nexists A) B k.
-intros.
-eapply plImp.
-2:intros m' M'; econstructor; apply M'.
-2:intros m' M'; apply M'.
-simpl.
-Admitted.