summaryrefslogblamecommitdiff
path: root/src/complex/cacosf.c
blob: ed8acf0f5a0161675da8692ba90112afc760c186 (plain) (tree)
1
2
3
4
5
6
7
8
9
                         


        

                                       


                                     
                                                          
 
#include "complex_impl.h"

// FIXME

static const float float_pi_2 = M_PI_2;

float complex cacosf(float complex z)
{
	z = casinf(z);
	return CMPLXF(float_pi_2 - crealf(z), -cimagf(z));
}