--- MITgcm_contrib/jscott/igsm/src/atmosphere.F	2006/08/11 19:35:30	1.1
+++ MITgcm_contrib/jscott/igsm/src/atmosphere.F	2006/08/22 20:25:52	1.2
@@ -132,7 +132,7 @@
       INTEGER dtatm, mndriver   !routine arguments
 
 #if ( defined OCEAN_3D || defined ML_2D )
-#include "AGRID.COM"
+#include "AGRID.h"
 C#include "HRD4OCN.COM"
         dimension oimeltt(jm0),dhdtav(jm0),devdtav(jm0)
 #endif
@@ -550,7 +550,7 @@
 c     HPRNT=TAU.ge.17520.0.and.TAU.lt.17545.0
 c     print *,' TAUE=',TAUE
 #if ( defined OCEAN_3D || defined ML_2D)
-         print *,'TAU,DTATM,TAUE: ', TAU,DTATM,TAUE
+C         print *,'TAU,DTATM,TAUE: ', TAU,DTATM,TAUE
          CALL OCEAN4ATM
          do j=1,jm0
            tauu(j)=0.