sinh



oops..make that

  (%i1) matchdeclare(z, lambda([s],true))$
  (%i2) block([exponentialize : false], tellsimpafter(sinh(z), exp(z)/2 - exp(-z)/2))$

  (%i3) sinh(a+b) - cosh(c);
  (%o3) -cosh(c)+%e^(b+a)/2-%e^(-b-a)/2

--Barton