theorem Th9:
  (for A holds P.A = P1.A) implies P = P1
proof
  assume for A holds P.A = P1.A;
  then for x being object st x in Sigma holds P.x = P1.x;
  hence thesis by FUNCT_2:12;
end;
