Parent Directory | Revision Log | Revision Graph | Patch
revision 1.28 by jmc, Mon Feb 6 23:36:40 2012 UTC | revision 1.29 by mlosch, Tue Feb 7 14:01:10 2012 UTC | |
---|---|---|
# | Line 519 C Update fluxes (consistent with the | Line 519 C Update fluxes (consistent with the |
519 | c ELSEIF ( postSolvTempIter.EQ.0 ) THEN | c ELSEIF ( postSolvTempIter.EQ.0 ) THEN |
520 | C Take fluxes from last iteration | C Take fluxes from last iteration |
521 | ||
ELSEIF ( postSolvTempIter.NE.0 ) THEN | ||
STOP 'SEAICE_SOLVE4TEMP: invalid postSolvTempIter' | ||
522 | ENDIF | ENDIF |
523 | ||
524 | C Fresh water flux (kg/m^2/s) from latent heat of sublimation. | C Fresh water flux (kg/m^2/s) from latent heat of sublimation. |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |