📄 pj_tsfn.c
字号:
/* determine small t */#ifndef lintstatic const char SCCSID[]="@(#)pj_tsfn.c 4.3 93/06/12 GIE REL";#endif#include <math.h>#include <projects.h>#define HALFPI 1.5707963267948966 doublepj_tsfn(double phi, double sinphi, double e) { sinphi *= e; return (tan (.5 * (HALFPI - phi)) / pow((1. - sinphi) / (1. + sinphi), .5 * e));}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -