reserve p,p1,p2,q,r,F,G,G1,G2,H,H1,H2 for ZF-formula,
  x,x1,x2,y,y1,y2,z,z1,z2,s,t for Variable,
  a,X for set;
reserve M for non empty set,
  m,m9 for Element of M,
  v,v9 for Function of VAR,M;
reserve i,j for Element of NAT;

theorem Th137:
  a in variables_in H implies a <> 0 & a <> 1 & a <> 2 & a <> 3 & a <> 4
proof
  assume a in variables_in H;
  then not a in {0,1,2,3,4} by XBOOLE_0:def 5;
  then not a in {0,1} \/ {2,3,4} by ENUMSET1:8;
  then ( not a in {0,1})& not a in {2,3,4} by XBOOLE_0:def 3;
  hence thesis by ENUMSET1:def 1,TARSKI:def 2;
end;
