133 double *az,
double *azd,
double *azdd,
134 double *el,
double *eld,
double *eldd,
135 double *pa,
double *pad,
double *padd ) {
137 const double TINY = 1E-30;
139 double sh,ch,sd,cd,sp,cp,chcd,sdcp,x,y,z,rsq,r,a,e,c,s,
140 q,qd,ad,ed,edr,add,edd,qdd;
185 add=edr*(z*sp+(2.0-rsq)*qd);
187 qdd=edr*(sp+2.0*z*qd);
void palAltaz(double ha, double dec, double phi, double *az, double *azd, double *azdd, double *el, double *eld, double *eldd, double *pa, double *pad, double *padd)
static const double PAL__DPI
static const double PAL__D2PI