summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/3482.v
blob: 87fd2723c9f2a10e8c13f1b1fe0f5936c01cdff4 (plain)
1
2
3
4
5
6
7
8
9
10
11
Set Primitive Projections.
Class Foo (F : False) := { foo : True }.
Arguments foo F {Foo}.
Print Implicit foo. (* foo : forall F : False, Foo F -> True

Argument Foo is implicit and maximally inserted *)
Check foo _. (* Toplevel input, characters 6-11:
Error: Illegal application (Non-functional construction):
The expression "foo" of type "True"
cannot be applied to the term
 "?36" : "?35" *)