8 lines
158 B
Text
8 lines
158 B
Text
open tactic
|
|
|
|
example (p q : Prop) : p → q → p ∧ q :=
|
|
by do
|
|
intros,
|
|
apply (expr.const ("and" <.> "intro") []),
|
|
trace_state,
|
|
all_goals assumption
|