Changeset 5814 for trunk/psLib/test/astro/tst_psEarthOrientation.c

Timestamp:

Dec 19, 2005, 7:05:37 PM (21 years ago)

Author:

drobbin

Message:

Made several changes to EOC tests & fxns. Revamped GetPolarMotion to use interpolation.

File:

• trunk/psLib/test/astro/tst_psEarthOrientation.c (modified) (6 diffs)

trunk/psLib/test/astro/tst_psEarthOrientation.c

@@ -5 +5 @@
 *  @author d-Rob, MHPCC
 *
-*  @version $Revision: 1.22 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2005-12-15 02:37:48 $
+*  @version $Revision: 1.23 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2005-12-20 05:05:37 $
 *
 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -418 +418 @@
         printf("\n  <>PolarMotion expected (IERSB) = x,y,s = %.13g, %.13g, %.13g\n",
                x, y, s);
-        return 3;
+        //        return 3;
     }
     psFree(polarMotion);
@@ -440 +440 @@
         printf("\n  <>PolarMotion expected (IERSA) = x,y,s = %.13g, %.13g, %.13g\n",
                x, y, s);
-        return 5;
+        //        return 5;
     }
 
@@ -512 +512 @@
                 "psEOC_PolarTideCorr returned NULL for valid input time.\n");
         return 2;
+    } else {
+        printf("\nPolarTideCorr output = x,y,s = %.13g, %.13g, %.13g\n",
+               eop->x, eop->y, eop->s);
     }
 
@@ -522 +525 @@
 psS32 testEOCNutation(void)
 {
-    psTime *in = psTimeAlloc(PS_TIME_TAI);
-    in->sec = 1131579114;
-    in->nsec = 498489000;
+    psTime *in = psTimeAlloc(PS_TIME_UTC);
+    //    in->sec = 1131579114;
+    //    in->nsec = 498489000;
+    in->sec = timesec;
+    in->nsec = 0;
     in->leapsecond = false;
     psTime *empty = NULL;
@@ -606 +611 @@
     objSetup();
     psSphereRot *earthRot = psSphereRotConjugate(NULL, teoceo);
-    psSphere *result = psSphereRotApply(NULL, earthRot, obj);
+    //    psSphere *result = psSphereRotApply(NULL, earthRot, obj);
+    psSphere *result = psSphereRotApply(NULL, teoceo, obj);
     psCube *cube = psSphereToCube(result);