Ejemplo n.º 1
0
gsl_complex gsl_complex_arcsinh(gsl_complex a)
{				/* z = arcsinh(a) */
    gsl_complex z = gsl_complex_mul_imag(a, 1.0);
    z = gsl_complex_arcsin(z);
    z = gsl_complex_mul_imag(z, -1.0);
    return z;
}
Ejemplo n.º 2
0
void
gsl_complex_arcsinh (complex_t const *a, complex_t *res)
{                               /* z = arcsinh(a) */
        gsl_complex_mul_imag (a, 1.0, res);
	gsl_complex_arcsin (res, res);
	gsl_complex_mul_imag (res, -1.0, res);
}
Ejemplo n.º 3
0
gsl_complex gsl_complex_arccsc(gsl_complex a)
{				/* z = arccsc(a) */
    gsl_complex z = gsl_complex_inverse(a);
    return gsl_complex_arcsin(z);
}
Ejemplo n.º 4
0
 /** Inverse sine
 \ingroup complex
 \param[in] z Complex number
 \return \f$ \arcsin z \f$*/
 complex arcsin(const complex& z)
 {
   return complex(gsl_complex_arcsin(z.as_gsl_type()));
 }
Ejemplo n.º 5
0
void
gsl_complex_arccsc (complex_t const *a, complex_t *res)
{                               /* z = arccsc(a) */
        gsl_complex_inverse (a, res);
	gsl_complex_arcsin (res, res);
}