theorem :: PZFMISC1:62

for I being set
for x1, x2, A, B being ManySortedSet of I st x1 c= A & x2 c= B holds
[|x1,x2|] c= [|A,B|]