lean4-htt/tests/lean/run/meta_tac7.lean
2017-03-09 18:41:19 -08:00

9 lines
197 B
Text

open nat tactic
example (a b c : Prop) (Ha : a) (Hb : b) (Hc : c) : b :=
by do trace_state, assumption
definition ex1 (a b c : Prop) : a → b → c → b :=
by do intros, assumption
#print ex1