lean4-htt/tests/lean/qexpr3.lean
2016-07-31 21:17:19 -07:00

7 lines
136 B
Text

open tactic
example (a b c : nat) (H1 : a = b) (H2 : b = c) : a = c :=
by do
refine `(eq.trans H1 _),
trace_state,
assumption