diff options
| author | Gaëtan Gilbert | 2018-08-28 16:11:17 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2018-09-13 15:05:57 +0200 |
| commit | eb4171d50d340e19e87a7a592b3d9c0d48654337 (patch) | |
| tree | 11a45863e0c2493fd768730571cefe5c27a384e8 /test-suite/misc/poly-capture-global-univs/theories/evil.v | |
| parent | ec4aa4971f7789eeccec2f38f2bb7ec976f87ede (diff) | |
Add test for inconsistency from polymorphism capturing global univs
Diffstat (limited to 'test-suite/misc/poly-capture-global-univs/theories/evil.v')
| -rw-r--r-- | test-suite/misc/poly-capture-global-univs/theories/evil.v | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/test-suite/misc/poly-capture-global-univs/theories/evil.v b/test-suite/misc/poly-capture-global-univs/theories/evil.v new file mode 100644 index 0000000000..7fd98c2773 --- /dev/null +++ b/test-suite/misc/poly-capture-global-univs/theories/evil.v @@ -0,0 +1,13 @@ + +Declare ML Module "evil_plugin". + +Evil T f. (* <- if this doesn't fail then the rest goes through *) + +Definition g : Type -> Set := f. + +Require Import Hurkens. + +Lemma absurd : False. +Proof. + exact (TypeNeqSmallType.paradox (g Type) eq_refl). +Qed. |