summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/3482.v
blob: 34a5e73da7fe77373d3f3193b94c78143fc89693 (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" *)