2014-07-02 20:14:50 +00:00
|
|
|
import standard
|
|
|
|
|
using tactic
|
2014-06-30 02:41:54 +00:00
|
|
|
|
|
|
|
|
theorem tst {A B : Bool} (H1 : A) (H2 : B) : ((fun x : Bool, x) A) ∧ B ∧ A
|
2014-07-03 01:10:42 +00:00
|
|
|
:= by apply and_intro; beta; assumption; apply and_intro; !assumption
|
2014-07-02 20:14:50 +00:00
|
|
|
|
