
theorem Th14:
  for I being non empty set for A be non-Empty TopStruct-yielding
  ManySortedSet of I for x being Point of Segre_Product A holds x is
  ManySortedSet of I
proof
  let I be non empty set;
  let A be non-Empty TopStruct-yielding ManySortedSet of I;
  let x be Point of Segre_Product A;
  ex f being Function st x=f & dom f = dom Carrier A &
  for a being object st a in dom Carrier A holds f.a in (Carrier A).a
  by CARD_3:def 5;
  hence thesis;
end;
