?? sphbes.c
字號(hào):
#include <math.h>#define RTPIO2 1.2533141void sphbes(int n, float x, float *sj, float *sy, float *sjp, float *syp){ void bessjy(float x, float xnu, float *rj, float *ry, float *rjp, float *ryp); void nrerror(char error_text[]); float factor,order,rj,rjp,ry,ryp; if (n < 0 || x <= 0.0) nrerror("bad arguments in sphbes"); order=n+0.5; bessjy(x,order,&rj,&ry,&rjp,&ryp); factor=RTPIO2/sqrt(x); *sj=factor*rj; *sy=factor*ry; *sjp=factor*rjp-(*sj)/(2.0*x); *syp=factor*ryp-(*sy)/(2.0*x);}#undef RTPIO2?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -