lean2/tests/lean/disj1.lean
Leonardo de Moura 935c2a03a3 feat(*): change name conventions for Lean builtin libraries
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-05 19:21:44 -08:00

21 lines
No EOL
385 B
Text

import tactic
theorem T1 (a b : Bool) : a \/ b => b \/ a.
apply discharge.
(* disj_hyp_tac() *)
(* disj_tac() *)
back
exact.
(* disj_tac() *)
exact.
done.
(*
simple_tac = Repeat(OrElse(imp_tac(), assumption_tac(), disj_hyp_tac(), disj_tac())) .. now_tac()
*)
theorem T2 (a b : Bool) : a \/ b => b \/ a.
simple_tac.
done.
print environment 1.