theorem
  <%>E in B implies A c= A ^^ (B+) & A c= (B+) ^^ A
proof
  assume <%>E in B;
  then B+ = B* by Th57;
  hence thesis by FLANG_2:18;
end;
