gonzui

t2ex

bsd_source/lib/libc/src_bsd/complex/s_csin.c - 2.3KB - 99 lines

87:         cchsh( cimag (z), &ch, &sh );
88:         w = sin (creal(z)) * ch + (cos (creal(z)) * sh) * I;
89:         return (w);