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