12 lines
163 B
Text
12 lines
163 B
Text
|
import logic
|
||
|
|
|
||
|
|
section
|
||
|
|
variables {A : Type}
|
||
|
|
variables f : A → A → A
|
||
|
|
infixl [local] `+++`:10 := f
|
||
|
|
|
||
|
|
variables a b c : A
|
||
|
|
check f a b
|
||
|
|
check a +++ b
|
||
|
|
end
|