2014-06-15 05:13:25 +00:00
|
|
|
precedence `+` : 65
|
|
|
|
precedence `*` : 75
|
|
|
|
precedence `=` : 50
|
|
|
|
precedence `≃` : 50
|
|
|
|
variable N : Type.{1}
|
|
|
|
variable a : N
|
|
|
|
variable b : N
|
|
|
|
variable add : N → N → N
|
|
|
|
variable mul : N → N → N
|
|
|
|
namespace foo
|
2014-06-15 15:28:49 +00:00
|
|
|
infixl + := add
|
|
|
|
infixl * := mul
|
2014-06-15 05:13:25 +00:00
|
|
|
check a+b*a
|
2014-08-07 23:59:08 +00:00
|
|
|
end foo
|
2014-06-15 05:13:25 +00:00
|
|
|
-- Notation is not avaiable outside the namespace
|
|
|
|
check a+b*a
|
|
|
|
namespace foo
|
|
|
|
-- Notation is restored
|
|
|
|
check a+b*a
|
2014-08-07 23:59:08 +00:00
|
|
|
end foo
|