theorem Th3: :: REALSET1:5

for X being set
for A being Subset of X holds A is pr1 (X,X) -binopclosed