theorem
  f=<>*g & x=<*y*> implies (f is_differentiable_in x iff g
  is_differentiable_in y) by Th7,Th8;
