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

theorem Th34:
  sinh is_differentiable_on REAL & diff(sinh,p)=cosh.p
proof
A1: [#]REAL is open Subset of REAL & REAL c= dom(sinh) by FUNCT_2:def 1;
  for p st p in REAL holds sinh is_differentiable_in p by Th31;
  hence thesis by A1,Th31,FDIFF_1:9;
end;
