Set: pp::colors
  Set: pp::unicode
  Proved: T4
theorem T4 (a b : Bool) : a ⇒ b ⇒ a ∧ b ∧ a :=
    discharge (λ H : a, discharge (λ H::1 : b, and::intro H (and::intro H::1 H)))