lean2/tests/lean/run/coe1.lean
Leonardo de Moura aff766430d fix(frontends/lean/pp): universe pretty printer
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-07-09 19:17:28 -07:00

30 lines
No EOL
587 B
Text

variable A : Type.{1}
variable B : Type.{1}
variable f : A → B
coercion f
variable g : B → B → B
variables a1 a2 a3 : A
variables b1 b2 b3 : B
check g a1 b1
set_option pp.coercion true
check g a1 b1
variable eq {A : Type} : A → A → Type.{0}
check eq a1 a2
check eq a1 b1
set_option pp.implicit true
check eq a1 b1
set_option pp.universes true
check eq a1 b1
inductive pair (A : Type) (B: Type) : Type :=
| mk_pair : A → B → pair A B
check mk_pair a1 b2
check B
check mk_pair
set_option pp.unicode false
check mk_pair
set_option pp.implicit false
check mk_pair
check pair