4 #include "base/cl_sysdep.h"
7 #include "cln/complex.h"
12 #include "complex/cl_C.h"
17 const cl_N operator/ (const cl_N& x, const cl_N& y)
20 // x,y beide reell -> klar.
21 // x=a+bi, y=c reell -> (a/c)+(b/c)i
22 // y komplex -> (* x (/ y))
31 // x komplex: x=a+bi, y=c
32 var const cl_R& a = realpart(x);
33 var const cl_R& b = imagpart(x);
34 var const cl_R& c = y;
35 return complex(a/c,b/c);