theorem
  B2 = {} implies X (*) (B1,B2) = X (-) B1
proof
  assume B2 = {};
  then X (*) (B1,B2) = (X (-) B1)/\(the carrier of TOP-REAL n) by Th8;
  hence thesis by XBOOLE_1:28;
end;
