lean2/tests/lean/run/e1.lean
2014-10-02 17:55:34 -07:00

15 lines
320 B
Text

definition Prop : Type.{1} := Type.{0}
constant eq : forall {A : Type}, A → A → Prop
constant N : Type.{1}
constants a b c : N
infix `=`:50 := eq
check a = b
constant f : Prop → N → N
constant g : N → N → N
precedence `+`:50
infixl + := f
infixl + := g
check a + b + c
constant p : Prop
check p + a + b + c