Parent Directory
|
Revision Log
|
Revision Graph
|
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 |