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

theorem
  Fint(A,0) = A by Def4;
