78 double palRvlg(
double r2000,
double d2000 ){
99 double va[ 3 ] = { -148.23284, +133.44888, -224.09467 };
102 eraS2c( r2000, d2000, vb );
double eraPdp(double a[3], double b[3])
void eraS2c(double theta, double phi, double c[3])
double palRvlg(double r2000, double d2000)