initial cmath code and minor libm.h update

[libm] / src / cmath / ccos.c

#include "libm.h"

double complex ccos(double complex z)
{
        return ccosh(cpack(-cimag(z), creal(z)));
}