reserve T for non empty RelStr,
  A,B for Subset of T,
  x,x2,y,z for Element of T;

theorem
  T is filled implies for n being Nat holds Fint(A,n+1) c= Fint(A,n)
proof
  assume
A1: T is filled;
  let n be Nat;
   reconsider n as Element of NAT by ORDINAL1:def 12;
  ((Fint A).n)^i = Fint(A,n+1) by Def4;
  hence thesis by A1,FIN_TOPO:22;
end;
