Commit cdbf167c authored by Jeroen Vreeken's avatar Jeroen Vreeken
Browse files

Fix build warnings in aalib

parent e688eba0
......@@ -30,7 +30,7 @@ int domoon()
{
int i, prtsav;
double ra0, dec0;
double x, y, z, lon0;
double x, /*y,*/ z, lon0;
double pp[3], qq[3], pe[3], re[3], moonpp[3], moonpol[3];
/* Geometric equatorial coordinates of the earth. */
......@@ -134,7 +134,7 @@ if( prtflg )
if( x > 45.0 )
{
y = -(x - 90.0)*z;
// y = -(x - 90.0)*z;
// if( y > 1.0 )
// printf( "Phase %.1f days before ", y );
// else
......@@ -143,7 +143,7 @@ if( prtflg )
}
else
{
y = x*z;
// y = x*z;
// if( y > 1.0 )
// printf( "Phase %.1f days past ", y );
// else
......
......@@ -329,7 +329,7 @@ double J;
double p[];
{
double ce, se, cl, sl, sino, f;
double dp[3], p1[3];
double /*dp[3],*/ p1[3];
int i;
nutlo(J); /* be sure we calculated nutl and nuto */
......@@ -362,8 +362,8 @@ p1[2] = sl*se*p[0]
+ ( sino + (cl-1.0)*se*coseps )*p[1]
+ ( cl*sineps*se + coseps*ce )*p[2];
for( i=0; i<3; i++ )
dp[i] = p1[i] - p[i];
//for( i=0; i<3; i++ )
// dp[i] = p1[i] - p[i];
//showcor( "nutation", p, dp );
for( i=0; i<3; i++ )
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment