lean4-htt/tests/lean/pstate.lean
2016-06-10 18:29:41 -07:00

5 lines
119 B
Text

exit
import logic
theorem foo {A : Type} (a b c : A) : a = b → b = c → a = c :=
assume h₁ h₂, eq.trans h₁ _