theorem Th57:
  A+ = A* iff <%>E in A
proof
  thus A+ = A* implies <%>E in A
  by FLANG_1:48,Th56;
  assume <%>E in A;
  then A* = (A*) ^^ A by FLANG_1:54;
  hence thesis by Th52;
end;
