--- MITgcm/pkg/seaice/groatb.F 2002/12/28 10:11:11 1.4 +++ 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