9 lines
No EOL
187 B
Text
9 lines
No EOL
187 B
Text
(**
|
|
simple_tac = REPEAT(ORELSE(imp_tac(), conj_tac())) .. assumption_tac()
|
|
**)
|
|
|
|
Theorem T4 (a b : Bool) : a => b => a /\ b := _.
|
|
apply simple_tac
|
|
done
|
|
|
|
Show Environment 1. |