summaryrefslogblamecommitdiff
path: root/src/complex/clog.c
blob: 12aae9c7e9a02e32f7c68a9a6f98e1218455cca8 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12











                                     
                                  
 
#include "libm.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);
}