25 lines
317 B
Text
25 lines
317 B
Text
|
import logic
|
||
|
|
|
||
|
|
section
|
||
|
|
variables (A B C : Type)
|
||
|
|
definition foo := A → B
|
||
|
|
|
||
|
|
check foo A B
|
||
|
|
check foo B C
|
||
|
|
check foo A A
|
||
|
|
end
|
||
|
|
|
||
|
|
constants A B C : Type
|
||
|
|
check foo A B
|
||
|
|
check foo B C
|
||
|
|
check foo A A
|
||
|
|
|
||
|
|
section
|
||
|
|
variables (A B C : Type)
|
||
|
|
definition foo2 := A → B
|
||
|
|
|
||
|
|
check foo2 A B
|
||
|
|
check foo2 B C
|
||
|
|
check foo2 A A
|
||
|
|
end
|