2014-06-25 15:30:09 +00:00
|
|
|
definition Bool [inline] : Type.{1} := Type.{0}
|
|
|
|
|
variable eq : forall {A : Type}, A → A → Bool
|
|
|
|
|
variable N : Type.{1}
|
|
|
|
|
variables a b c : N
|
2014-07-01 23:55:41 +00:00
|
|
|
infix `=`:50 := eq
|
2014-06-25 15:30:09 +00:00
|
|
|
check a = b
|
|
|
|
|
|
|
|
|
|
variable f : Bool → N → N
|
|
|
|
|
variable g : N → N → N
|
|
|
|
|
precedence `+`:50
|
|
|
|
|
infixl + := f
|
|
|
|
|
infixl + := g
|
|
|
|
|
check a + b + c
|
|
|
|
|
variable p : Bool
|
|
|
|
|
check p + a + b + c
|
