lean2/tests/lean/tactic9.lean
Leonardo de Moura ca53a5a1cc feat(library/tactic): add unfold tactic
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2013-12-01 08:51:56 -08:00

11 lines
No EOL
285 B
Text

Definition f(a : Bool) : Bool := not a.
Theorem T (a b : Bool) : a \/ b => (f b) => a := _.
apply imp_tactic
apply imp_tactic
apply disj_hyp_tactic
apply (** unfold_tactic("f") **)
apply assumption_tactic
apply absurd_tactic
done
Show Environment 1.