?? pow_di.c
字號:
#include "f2c.h"#ifdef __cplusplusextern "C" {#endif#ifdef KR_headersdouble pow_di(ap, bp) doublereal *ap; integer *bp;#elsedouble pow_di(doublereal *ap, integer *bp)#endif{double pow, x;integer n;unsigned long u;pow = 1;x = *ap;n = *bp;if(n != 0) { if(n < 0) { n = -n; x = 1/x; } for(u = n; ; ) { if(u & 01) pow *= x; if(u >>= 1) x *= x; else break; } }return(pow);}#ifdef __cplusplus}#endif
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -