Searched refs:dimag (Results 1 – 6 of 6) sorted by relevance
2160 if( (abi = b->dimag) < 0.)2166 ratio = b->dreal / b->dimag ;2167 den = b->dimag * (1 + ratio*ratio);2168 c->dreal = (a->dreal*ratio + a->dimag) / den;2169 c->dimag = (a->dimag*ratio - a->dreal) / den;2174 ratio = b->dimag / b->dreal ;2176 c->dreal = (a->dreal + a->dimag*ratio) / den;2177 c->dimag = (a->dimag - a->dreal*ratio) / den;
271 double dreal, dimag; member
888 print *, aimag(z4), dimag(z8)
7774 print *, aimag(z4), dimag(z8)
884 print *, aimag(z4), dimag(z8)
7456 print *, aimag(z4), dimag(z8)