theorem Th32:
  for x holds
   ex a being Element of Frac(S) st x = Class(EqRel(S),a)
   proof
     let x;
     the carrier of S~R = Class EqRel(S) by Def6; then
     x in Class EqRel(S); then
     ex a being object st a in Frac(S) & x = Class(EqRel(S),a)
     by EQREL_1:def 3;
     hence thesis;
   end;
