theorem T (a : Bool) : a → a.
(* foo_tac *)