theorem
  the_left_argument_of F <=> G = F => G & the_right_argument_of F <=> G
  = G => F by Th4;
