X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Fcomplex%2Ftranscendental%2Fcl_C_cis.cc;h=fc29e4313917db810451788fb8c7ee6694dfeb0d;hb=e52830748240df6b0ab51d8a78243c88132f6c75;hp=0753a2729aaeccf036a3ddf01c518679c33d78d0;hpb=dd9e0f894eec7e2a8cf85078330ddc0a6639090b;p=cln.git

diff --git a/src/complex/transcendental/cl_C_cis.cc b/src/complex/transcendental/cl_C_cis.cc
index 0753a27..fc29e43 100644
--- a/src/complex/transcendental/cl_C_cis.cc
+++ b/src/complex/transcendental/cl_C_cis.cc
@@ -4,13 +4,15 @@
 #include "cl_sysdep.h"
 
 // Specification.
-#include "cl_complex.h"
+#include "cln/complex.h"
 
 
 // Implementation.
 
 #include "cl_C.h"
-#include "cl_real.h"
+#include "cln/real.h"
+
+namespace cln {
 
 const cl_N cis (const cl_N& x)
 {
@@ -19,16 +21,18 @@ const cl_N cis (const cl_N& x)
 // x = a+bi -> (complex (* (exp (- b)) (cos a)) (* (exp (- b)) (sin a)))
 	if (realp(x)) {
 		DeclareType(cl_R,x);
-		var cl_cos_sin_t trig = cl_cos_sin(x);
+		var cos_sin_t trig = cos_sin(x);
 		return complex(trig.cos, trig.sin);
 	} else {
 		DeclareType(cl_C,x);
 		// x=a+bi
 		var const cl_R& a = realpart(x);
 		var const cl_R& b = imagpart(x);
-		var cl_cos_sin_t trig_a = cl_cos_sin(a); // cos(a), sin(a) errechnen
+		var cos_sin_t trig_a = cos_sin(a); // cos(a), sin(a) errechnen
 		var cl_R exp_minusb = exp(-b); // (exp (- b))
 		return complex(exp_minusb*trig_a.cos, // (* (exp (- b)) (cos a))
 			       exp_minusb*trig_a.sin); // (* (exp (- b)) (sin a))
 	}
 }
+
+}  // namespace cln