PI
#ifndef PI
* MAXDIR / (2 * PI) + 2.5 + MAXDIR) % MAXDIR)
Ec = 360 / PI * ECCEN * sin(dtor(Msol)); /* sec 46 #5 */
return(deg * PI / 180);
#ifndef PI
vc(PI, 3.1415926535897932270E0 ,0fda,4149,68c2,a221, 2, .C90FDAA22168C2)
ic(PI, 3.1415926535897931160E0 , 1, 1.921FB54442D18)
#define PI vccast(PI)
if(y==zero) return((signx==one)?y:copysign(PI,signy));
return(copysign((signx==one)?zero:PI,signy));
return (copysign((signx>zero)?t:PI-t,signy)); }
return(copysign((signx>zero)?z:PI-z,signy));
a = PI-a;
x = copysign((a = PI-a),x);
x = drem(x,PI); /* reduce x into [-PI/2, PI/2] */
vc(PI, 3.1415926535897932270E0 ,0fda,4149,68c2,a221, 2, .C90FDAA22168C2)
ic(PI, 3.1415926535897931160E0 , 1, 1.921FB54442D18)
#define PI vccast(PI)
#define PI_ISBSDFS(PI) (PI_FSTYPE(PI) == FS_BSDLFS || \
PI_FSTYPE(PI) == FS_BSDFFS)