7 #include "cl_complex.h"
16 // Wert und Branch Cuts nach der Formel CLTL2, S. 311:
17 // arcsin(z) = log(iz+sqrt(1-z^2))/i
18 // Sei z=x+iy, errechne u+iv = arsinh(-y+ix) wie oben, Ergebnis v-iu.
19 // Real- und Imaginärteil des Ergebnisses sind Floats, außer wenn z reell oder
22 inline const cl_C_R _asin (const cl_N& z)
29 return asinh(-imagpart(z),realpart(z));
33 const cl_N asin (const cl_N& z)
35 var cl_C_R u_v = _asin(z);
36 var cl_R& u = u_v.realpart;
37 var cl_R& v = u_v.imagpart;
38 return complex(v,-u); // v-iu