let n be Element of NAT ; :: thesis: for X, B1, B2 being Subset of (TOP-REAL n) st B1 = {} holds
X (*) (B1,B2) = (X `) (-) B2

let X, B1, B2 be Subset of (TOP-REAL n); :: thesis: ( B1 = {} implies X (*) (B1,B2) = (X `) (-) B2 )
assume B1 = {} ; :: thesis: X (*) (B1,B2) = (X `) (-) B2
then X (*) (B1,B2) = ((X `) (-) B2) /\ the carrier of (TOP-REAL n) by Th8;
hence X (*) (B1,B2) = (X `) (-) B2 by XBOOLE_1:28; :: thesis: verum