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;

theorem Th6:
  the_antecedent_of (p => q) = p & the_consequent_of (p => q) = q
proof
  p => q is conditional;
  then
  p => q = (the_antecedent_of (p => q)) => (the_consequent_of (p => q)) by
ZF_LANG:47;
  hence thesis by ZF_LANG:32;
end;
