Index: /trunk/psLib/test/astronomy/tst_psTime_03.c
===================================================================
--- /trunk/psLib/test/astronomy/tst_psTime_03.c	(revision 2965)
+++ /trunk/psLib/test/astronomy/tst_psTime_03.c	(revision 2966)
@@ -19,6 +19,6 @@
  *  @author  Ross Harman, MHPCC
  *
- *  @version $Revision: 1.9 $  $Name: not supported by cvs2svn $
- *  @date  $Date: 2005-01-13 01:35:30 $
+ *  @version $Revision: 1.10 $  $Name: not supported by cvs2svn $
+ *  @date  $Date: 2005-01-13 01:58:10 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -130,4 +130,20 @@
     printFooter(stdout, "psTime", "Test F - Delta two times with underflow in microseconds", true);
 
+    // Test F1 - Delta two times in UTC type
+    printPositiveTestHeader(stdout,"psTime","Test F1 - Delta two UTC times");
+    psTime *time20a = NULL;
+    psTime *time20b = NULL;
+    psF64 timeOut20 = 0.0;
+    time20a = psTimeAlloc(PS_TIME_UTC);
+    time20b = psTimeAlloc(PS_TIME_UTC);
+    time20a->sec = 1090434113;
+    time20a->usec = 272044;
+    time20b->sec = 1090434112;
+    time20b->usec = 272044;
+    timeOut20 = psTimeDelta(time20a, time20b);
+    if(fabs(timeOut20-1.000000000) > FLT_EPSILON) {
+        printf("ERROR: Incorrect delta, %lf. Expected -1.00000\n",timeOut20);
+    }
+    printFooter(stdout,"psTime","Test F1 - Delta two UTC times",true);
 
     // Test G - Add two times across leapsecond boundary
@@ -185,4 +201,6 @@
     psFree(time8a);
     psFree(time8b);
+    psFree(time20a);
+    psFree(time20b);
     if (psMemCheckLeaks(0, NULL, stdout,false)) {
         psError(PS_ERR_UNKNOWN,true,"Memory leaks detected.");
Index: /trunk/psLib/test/astronomy/verified/tst_psTime_03.stdout
===================================================================
--- /trunk/psLib/test/astronomy/verified/tst_psTime_03.stdout	(revision 2965)
+++ /trunk/psLib/test/astronomy/verified/tst_psTime_03.stdout	(revision 2966)
@@ -55,4 +55,13 @@
 /***************************** TESTPOINT ******************************************\
 *             TestFile: tst_psTime_03.c                                            *
+*            TestPoint: psTime{Test F1 - Delta two UTC times}                      *
+*             TestType: Positive                                                   *
+\**********************************************************************************/
+
+
+---> TESTPOINT PASSED (psTime{Test F1 - Delta two UTC times} | tst_psTime_03.c)
+
+/***************************** TESTPOINT ******************************************\
+*             TestFile: tst_psTime_03.c                                            *
 *            TestPoint: psTime{Test G - Add two times across leapsecond boundary}  *
 *             TestType: Positive                                                   *
