theorem
  { A } c= bool A
proof
  A in bool A by Def1;
  hence thesis by Lm1;
end;
