theorem T2 (a b : Bool) : a => b => a /\ b.
done.
done.
(* imp_tac() *).
imp_tac2.
foo.
(* imp_tac() *).
(* imp_tac() *).
(* conj_tac() *).
back.
(* assumption_tac() *).
done.
