9 lines
No EOL
270 B
Text
9 lines
No EOL
270 B
Text
(** 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 |