4 #include "base/cl_sysdep.h"
7 #include "cln/complex.h"
12 #include "complex/cl_C.h"
15 #include "base/cl_inline.h"
16 #include "complex/algebraic/cl_C_abs_aux.cc"
20 const cl_N CL_FLATTEN signum (const cl_N& x)
24 // x komplex -> falls (zerop x), x als Ergebnis, sonst (/ x (abs x)).
33 return x / abs_inline(x);