New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 10923 for NEMO – NEMO

Changeset 10923 for NEMO


Ignore:
Timestamp:
2019-05-03T11:59:39+02:00 (5 years ago)
Author:
clem
Message:

solve a problem of restartability and reproducibility if ln_cndflx is activated in the ice model (used for coupling at the Met-Office)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/releases/release-4.0/src/ICE/icethd_zdf_bl99.F90

    r10534 r10923  
    742742                  zdti_max = MAX ( zdti_max , MAXVAL( ABS( t_s_1d(ji,1:nlay_s) - ztsb(ji,1:nlay_s) ) ) ) 
    743743                  ! t_i 
    744                   DO jk = 0, nlay_i 
     744                  DO jk = 1, nlay_i 
    745745                     ztmelts       = -rTmlt * sz_i_1d(ji,jk) + rt0  
    746746                     t_i_1d(ji,jk) =  MAX( MIN( t_i_1d(ji,jk), ztmelts ), rt0 - 100._wp ) 
Note: See TracChangeset for help on using the changeset viewer.