theorem Th2: :: UNIFORM2:1

for X being set
for A being Subset of X holds [:(X \ A),X:] \/ [:X,A:] c= [:X,X:]