theorem
  A+ ^^ (A?) = A+
proof
  thus A+ ^^ (A?) = A |^.. 1 ^^ (A?) by Th50
    .= A |^.. 1 by Th41
    .= A+ by Th50;
end;
