lean4-htt/old_tests/tests/lean/run/e1.lean
2018-04-10 12:56:55 -07:00

16 lines
327 B
Text

prelude
definition Prop : Sort.{1} := Sort.{0}
constant eq : forall {A : Type}, A → A → Prop
constant N : Type
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