2014-12-01 05:16:01 +00:00
|
|
|
prelude constant A : Type.{1}
|
2014-10-02 23:20:52 +00:00
|
|
|
constant f : A → A → A
|
|
|
|
constant g : A → A → A
|
2014-06-15 18:50:41 +00:00
|
|
|
precedence `+` : 65
|
|
|
|
infixl + := f
|
|
|
|
infixl + := g
|
2014-10-02 23:20:52 +00:00
|
|
|
constant a : A
|
|
|
|
constant b : A
|
2014-06-15 18:50:41 +00:00
|
|
|
print raw a+b -- + is overloaded
|
|
|
|
check fun (h : A → A → A)
|
|
|
|
(infixl + := h), -- Like local declarations, local notation "shadows" global one.
|
2014-10-02 23:20:52 +00:00
|
|
|
a+b
|