theorem
  A ^^ A c= A*
proof
  A ^^ A = A |^ 2 by Th26;
  hence thesis by Th42;
end;
