9 lines
No EOL
180 B
Text
9 lines
No EOL
180 B
Text
(*
|
|
simple_tac = Repeat(OrElse(imp_tac(), conj_tac())) .. assumption_tac()
|
|
*)
|
|
|
|
theorem T4 (a b : Bool) : a => b => a /\ b := _.
|
|
simple_tac
|
|
done
|
|
|
|
print environment 1. |