test: add second example for issue #423
This commit is contained in:
parent
b670d6b8d7
commit
2cbdd637c7
2 changed files with 26 additions and 0 deletions
|
|
@ -1,3 +1,5 @@
|
|||
universe u
|
||||
|
||||
#check fun {T : Sort u} (a : T) => a + 0
|
||||
|
||||
#check fun {T : Sort u} (a : T) [Add T] [OfNat T 0] => a + 0
|
||||
|
|
|
|||
|
|
@ -6,3 +6,27 @@ has type
|
|||
T : Sort u
|
||||
but is expected to have type
|
||||
Nat : Type
|
||||
423.lean:5:33-5:38: error: application type mismatch
|
||||
Add T
|
||||
argument
|
||||
T
|
||||
has type
|
||||
Sort u : Type u
|
||||
but is expected to have type
|
||||
Type ?u : Type (?u + 1)
|
||||
423.lean:5:41-5:50: error: application type mismatch
|
||||
OfNat T
|
||||
argument
|
||||
T
|
||||
has type
|
||||
Sort u : Type u
|
||||
but is expected to have type
|
||||
Type ?u : Type (?u + 1)
|
||||
423.lean:5:55-5:60: error: application type mismatch
|
||||
HAdd.hAdd a
|
||||
argument
|
||||
a
|
||||
has type
|
||||
T : Sort u
|
||||
but is expected to have type
|
||||
Nat : Type
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue