lean2/tests/lean/disjcases.lean
Leonardo de Moura ce1213a020 feat(frontends/lean): use '(* ... *)' instead of '(** ... **)' for script code blocks
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-05 10:32:47 -08:00

11 lines
No EOL
214 B
Text

(* import("tactic.lua") *)
Variables a b c : Bool
Axiom H : a \/ b
Theorem T (a b : Bool) : a \/ b => b \/ a.
apply Discharge.
apply (DisjCases H).
apply Disj2.
exact.
apply Disj1.
exact.
done.