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

theorem Th16:
  sinh.0 = 0
proof
  sinh.0 = (exp_R.0-exp_R.(-0))/2 by Def1
    .= 0;
  hence thesis;
end;
