lean2/tests/lean/tactic3.lean

(** import("tactic.lua") **)
Variables p q r : Bool

Theorem T1 : p => p /\ q => r => q /\ r /\ p := _.
    (** Repeat(OrElse(imp_tac(), conj_tac(), conj_hyp_tac(), assumption_tac())) **)
    done

(* Display proof term generated by previous tactic *)
Show Environment 1
refactor(frontends/lean/parser): tactic macros, and tactic Lua bindings Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-12-26 23:54:53 +00:00			`( import("tactic.lua") )`
feat(library/tactic): make THEN, ORELSE, APPEND, PAR and INTERLEAVE nary combinators Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-11-29 06:11:07 +00:00			`Variables p q r : Bool`

			`Theorem T1 : p => p /\ q => r => q /\ r /\ p := _.`
refactor(frontends/lean/parser): tactic macros, and tactic Lua bindings Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-12-26 23:54:53 +00:00			`( Repeat(OrElse(imp_tac(), conj_tac(), conj_hyp_tac(), assumption_tac())) )`
feat(library/tactic): make THEN, ORELSE, APPEND, PAR and INTERLEAVE nary combinators Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-11-29 06:11:07 +00:00			`done`

			`(* Display proof term generated by previous tactic *)`
			`Show Environment 1`