reserve A,B,C for Ordinal,
  K,L,M,N for Cardinal,
  x,y,y1,y2,z,u for object,X,Y,Z,Z1,Z2 for set,
  n for Nat,
  f,f1,g,h for Function,
  Q,R for Relation;
reserve ff for Cardinal-Function;
reserve F,G for Cardinal-Function;
reserve A,B for set;
reserve A,B for Ordinal;
reserve n,k for Nat;

theorem Th100:
 for I being set, f being non-empty I-defined Function
 for p being f-compatible I-defined Function
  holds p in sproduct f
 proof let I be set, f be non-empty I-defined Function;
  let p be f-compatible I-defined Function;
A1: dom p c= dom f by FUNCT_1:105;
   for x being object st x in dom p holds p.x in f.x by FUNCT_1:def 14;
  hence p in sproduct f by A1,Def9;
 end;
