2014-12-01 05:16:01 +00:00
|
|
|
prelude precedence `+` : 65
|
2014-06-15 18:30:52 +00:00
|
|
|
precedence `*` : 75
|
2014-10-02 23:20:52 +00:00
|
|
|
constant N : Type.{1}
|
2014-06-15 18:30:52 +00:00
|
|
|
check λ (f : N -> N -> N) (g : N → N → N) (infix + := f) (infix * := g) (x y : N), x+x*y
|
2014-10-02 23:20:52 +00:00
|
|
|
constant f : N → N → N
|
|
|
|
constant a : N
|
2014-06-15 18:30:52 +00:00
|
|
|
check a+a -- + notation is not available anymore
|