reserve p,q,r,th,th1 for Real;
reserve n for Nat;

theorem
  tanh is_differentiable_in p & diff(tanh,p)=1/(cosh.p)^2 by Lm22,Lm23;
