Exemplo n.º 1
0
 /** Hyperbolic tangent
 \ingroup complex
 \param[in] z Complex number
 \return \f$ \tanh z \f$*/
 complex tanh(const complex& z)
 {
   return complex(gsl_complex_tanh(z.as_gsl_type()));
 }
Exemplo n.º 2
0
gsl_complex gsl_complex_coth(gsl_complex a)
{				/* z = coth(a) */
    gsl_complex z = gsl_complex_tanh(a);
    return gsl_complex_inverse(z);
}
Exemplo n.º 3
0
void
gsl_complex_coth (complex_t const *a, complex_t *res)
{                               /* z = coth(a) */
        gsl_complex_tanh (a, res);
	gsl_complex_inverse (res, res);
}