/[MITgcm]/MITgcm/pkg/seaice/groatb.F
ViewVC logotype

Diff of /MITgcm/pkg/seaice/groatb.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

--- MITgcm/pkg/seaice/groatb.F	2003/02/13 19:28:39	1.4.4.1
+++ MITgcm/pkg/seaice/groatb.F	2003/02/14 23:10:36	1.4.4.2
@@ -62,7 +62,7 @@
           TMIX(I,J,bi,bj)=theta(I,J,1,bi,bj)+273.16 _d +00
 #ifdef SEAICE_DEBUG
           TMIX(I,J,bi,bj)=MAX(TMIX(I,J,bi,bj),271.2 _d +00)
-#endif SEAICE_DEBUG
+#endif
          ENDDO
         ENDDO
 
@@ -87,7 +87,7 @@
        ENDDO
       ENDDO
 
-#endif ALLOW_SEAICE
+#endif /* ALLOW_SEAICE */
 
       RETURN
       END

 

  ViewVC Help
Powered by ViewVC 1.1.22