theorem Th46:
  B is non-descending implies inferior_setsequence B = B
proof
  assume B is non-descending;
  then (inferior_setsequence B).n = B.n by Th45;
  then for n being Element of NAT holds (inferior_setsequence B).n = B.n;
  hence thesis by FUNCT_2:63;
end;
