theorem Th11:
for
x1,
x2,
y1,
y2 being
object for
X1,
X2,
Y1,
Y2 being
set st
X1,
Y1 are_equipotent &
X2,
Y2 are_equipotent &
x1 <> x2 &
y1 <> y2 holds
(
[:X1,{x1}:] \/ [:X2,{x2}:],
[:Y1,{y1}:] \/ [:Y2,{y2}:] are_equipotent &
card ([:X1,{x1}:] \/ [:X2,{x2}:]) = card ([:Y1,{y1}:] \/ [:Y2,{y2}:]) )