Changeset 6036 for trunk/psLib/src/astro/psEarthOrientation.c

Timestamp:

Jan 18, 2006, 10:59:32 AM (21 years ago)

Author:

drobbin

Message:

Small update to TEO/polarTide. New fxn Time_TideUT1Corr done and tested.

File:

• trunk/psLib/src/astro/psEarthOrientation.c (modified) (3 diffs)

trunk/psLib/src/astro/psEarthOrientation.c

@@ -8 +8 @@
  *  @author Robert Daniel DeSonia, MHPCC
  *
- *  @version $Revision: 1.27 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2006-01-18 00:41:29 $
+ *  @version $Revision: 1.28 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2006-01-18 20:59:31 $
  *
  *  Copyright 2005 Maui High Performance Computing Center, University of Hawaii
@@ -846 +846 @@
     if (tidalCorr != NULL && tidalCorr->s != 0.0) {
         int nsec = in->nsec + (int)(tidalCorr->s * 1e9);
-        if (nsec < 0.0) {
+        if (nsec < 0) {
             in->sec += -1;
-            in->nsec = (int)(1e9) - nsec;
+            in->nsec = (int)(1e9) + nsec;
         } else {
             in->nsec = nsec;
@@ -1009 +1009 @@
 
     // Calculate number of Julian centuries since 2000
-    //XXX: NOT SURE IF THIS IS CORRECT FOR THIS SITUATION
-    //    double RJD = ( MJD - MJD_2000 ) / JULIAN_CENTURY;
     double RJD = MJD;