theorem
  dom R \ dom(R|A) = dom(R \ (R|A))
proof
  thus dom R \ dom(R|A) = dom R \ A /\ dom R by Th55
     .= dom R \ A by XBOOLE_1:47
     .= dom(R \ (R|A)) by Th167;
end;
