?? z_sqrt.c
字號:
#include "complex"z_sqrt(r, z)dcomplex *r, *z;{double mag, sqrt(), cabs();if( (mag = cabs(z->dreal, z->dimag)) == 0.) r->dreal = r->dimag = 0.;else if(z->dreal > 0) { r->dreal = sqrt(0.5 * (mag + z->dreal) ); r->dimag = z->dimag / r->dreal / 2; }else { r->dimag = sqrt(0.5 * (mag - z->dreal) ); if(z->dimag < 0) z->dimag = - z->dimag; r->dreal = z->dimag / r->dimag / 2; }}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -