--- MITgcm/pkg/thsice/thsice_ave.F	2005/04/06 18:47:11	1.7
+++ MITgcm/pkg/thsice/thsice_ave.F	2005/05/15 03:04:57	1.8
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/thsice/thsice_ave.F,v 1.7 2005/04/06 18:47:11 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/thsice/thsice_ave.F,v 1.8 2005/05/15 03:04:57 jmc Exp $
 C $Name:  $
 
 #include "THSICE_OPTIONS.h"
@@ -46,8 +46,8 @@
 
 #ifdef ALLOW_THSICE
 C     == Local variables ==
-      LOGICAL  DIFF_BASE_MULTIPLE
-      EXTERNAL DIFF_BASE_MULTIPLE
+      LOGICAL  DIFFERENT_MULTIPLE
+      EXTERNAL DIFFERENT_MULTIPLE
       INTEGER wrtIter
 
 #ifdef ALLOW_TIMEAVE
@@ -119,7 +119,7 @@
       ENDIF
 #endif /* ALLOW_TIMEAVE */
 
-      IF ( DIFF_BASE_MULTIPLE(baseTime,thSIce_diagFreq,
+      IF ( DIFFERENT_MULTIPLE(thSIce_diagFreq,
      &                        myTime+deltaTClock,deltaTClock)
      &     .AND. fluidIsWater ) THEN 
         wrtIter = myIter+1