gonzui

t2ex

bsd_source/lib/libc/src_bsd/complex/s_ccosf.c - 2.0KB - 84 lines

81:         _cchshf( cimagf(z), &ch, &sh );
82:         w = cosf( crealf(z) ) * ch + ( -sinf( crealf(z) ) * sh) * I;
83:         return (w);