theorem Th42:
 for n being Nat holds
  B is non-descending implies (superior_setsequence B).n = Union B
proof let n be Nat;
  defpred P[Nat] means (superior_setsequence B).$1 = Union B;
  assume B is non-descending;
  then
A1: for k being Nat st P[k] holds P[k+1] by Th41;
A2: P[0] by Th18;
  for k being Nat holds P[k] from NAT_1:sch 2(A2,A1);
  hence thesis;
end;
