Changeset 39457 for trunk/Ohana/src/skycalc

Timestamp:

Mar 11, 2016, 10:23:42 PM (10 years ago)

Author:

eugene

Message:

modify to pass with extremely pedantic build; force consistency for signed vs unsigned and int sizes; various relastro updates

Location:

trunk/Ohana

Files:

• . (modified) (1 prop)
• src/skycalc/src/astro.c (modified) (3 diffs)

trunk/Ohana/src/skycalc/src/astro.c

@@ -1 +1 @@
 # include <skycalc_internal.h>
+# define UNUSED_PARAM(x)(void)(x)
 
 /* Takes a coordinate pair and precesses it using matrix procedures
@@ -104 +105 @@
    equatorial (all assumed of date.) */
 void SC_eclrot(double jd, double *x, double *y, double *z) {
+  UNUSED_PARAM(x);
 
   double incl;
@@ -112 +114 @@
 
   incl = (23.439291 + T * (-0.0130042 - 0.00000016 * T))/DEG_IN_RADIAN;
-  /* 1992 Astron Almanac, p. B18, dropping the
-     cubic term, which is 2 milli-arcsec! */
+/* 1992 Astron Almanac, p. B18, dropping the
+   cubic term, which is 2 milli-arcsec! */
   ypr = cos(incl) * *y - sin(incl) * *z;
   zpr = sin(incl) * *y + cos(incl) * *z;
   *y = ypr;
   *z = zpr;
-  /* x remains the same. */
+/* x remains the same. */
 }
 
 /* Given a julian date in 1900-2100, returns the correction
-     delta t which is:
-     TDT - UT (after 1983 and before 1993)
-     ET - UT (before 1983)
-     an extrapolated guess  (after 1993).
+   delta t which is:
+   TDT - UT (after 1983 and before 1993)
+   ET - UT (before 1983)
+   an extrapolated guess  (after 1993).
 
-     For dates in the past (<= 1993) the value is linearly
-     interpolated on 5-year intervals; for dates after the present,
-     an extrapolation is used, because the true value of delta t
-     cannot be predicted precisely.  Note that TDT is essentially the
-     modern version of ephemeris time with a slightly cleaner
-     definition.
+   For dates in the past (<= 1993) the value is linearly
+   interpolated on 5-year intervals; for dates after the present,
+   an extrapolation is used, because the true value of delta t
+   cannot be predicted precisely.  Note that TDT is essentially the
+   modern version of ephemeris time with a slightly cleaner
+   definition.
 
-     Where the algorithm shifts there is an approximately 0.1 second
-     discontinuity.  Also, the 5-year linear interpolation scheme can
-     lead to errors as large as 0.5 seconds in some cases, though
-     usually rather smaller. */
+   Where the algorithm shifts there is an approximately 0.1 second
+   discontinuity.  Also, the 5-year linear interpolation scheme can
+   lead to errors as large as 0.5 seconds in some cases, though
+   usually rather smaller. */
 
 double SC_etcorr (double jd) {