blob: 6613b285713575c217e5c03353dcb8b5d6e9f504 (
plain)
1
2
3
4
5
6
7
8
|
(* Checking that the type inference algoithme does not commit to an
equality over sorts when only a subtyping constraint is around *)
Parameter A : Set.
Parameter B : A -> Set.
Parameter F : Set -> Prop.
Check (F (forall x, B x)).
|