theorem
  z in [:X,{y}:] implies z`1 in X & z`2 = y
proof
  assume
A1: z in [:X,{y}:];
  then z`2 in {y} by Th4;
  hence thesis by A1,Th4,TARSKI:def 1;
end;
