gonzui

t2ex

bsd_source/lib/libc/src_bsd/complex/s_ctanf.c - 3.4KB - 148 lines

91: 
92:         x = fabsf(2.0f * crealf(z));
93:         y = fabsf(2.0f * cimagf(z));
94: 
124:         }
125:         while (fabsf(t/d) > MACHEPF)
126:                 ;
137: 
138:         if(fabsf(d) < 0.25f)
139:                 d = _ctansf(z);