11 lines
163 B
Text
11 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
|