theorem
  Intersection B c= (inferior_setsequence B).n
proof
  0 <= n by NAT_1:2;
  then (inferior_setsequence B).0 c= (inferior_setsequence B).n by PROB_1:def 5
;
  hence thesis by Th17;
end;
