lean2/tests/lean/run/coe7.lean

12 lines
223 B
Text
Raw Normal View History

import logic
variable nat : Type.{1}
variable int : Type.{1}
variable of_nat : nat → int
coercion of_nat
theorem tst (n : nat) : n = n :=
have H : true, from trivial,
calc n = n : eq.refl _
... = n : eq.refl _