From 4abab5ad6c8465a7528ccdd5f49367da05f78bbd Mon Sep 17 00:00:00 2001 From: Vladimir Azarov Date: Tue, 1 Oct 2024 15:47:05 +0200 Subject: Initial version --- src/complex/clog.c | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/complex/clog.c (limited to 'src/complex/clog.c') diff --git a/src/complex/clog.c b/src/complex/clog.c new file mode 100644 index 0000000..b587c29 --- /dev/null +++ b/src/complex/clog.c @@ -0,0 +1,14 @@ +#include "complex_impl.h" + +// FIXME + +/* log(z) = log(|z|) + i arg(z) */ + +double complex clog(double complex z) +{ + double r, phi; + + r = cabs(z); + phi = carg(z); + return CMPLX(log(r), phi); +} -- cgit v1.2.3