reserve U for Universe;

theorem
  for R being RelStr st R in fin_RelStr_sp holds (the carrier of R) in FinSETS
proof
  let R be RelStr;
  assume R in fin_RelStr_sp;
  then
  ex S being strict RelStr st R = S & the carrier of S in FinSETS by Def4;
  hence thesis;
end;
