aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/bug_13086.v
blob: 75f842b1cf283c362d8a262e5b35e2cb297d0c98 (plain)
1
2
3
4
5
6
7
8
9
10
11
Unset Universe Checking.

Definition bad1@{|Set < Set} := Prop.

Set Universe Polymorphism.
Axiom ax : Type.
Inductive I@{u} : Prop := foo : ax@{u} -> I.

Definition bad2@{v} (x:I@{v}) : I@{Set} := x.

Definition vsdvds (f : (Prop -> Prop) -> Prop) (x : Set -> Prop) := f x.