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 9943 for NEMO/trunk/src/ICE/icethd_pnd.F90 – NEMO

Ignore:
Timestamp:
2018-07-13T16:15:22+02:00 (6 years ago)
Author:
clem
Message:

add a proper correction for negative values occuring after Ultimate-Macho advection scheme. This correction conserves mass, heat etc. 3 diagnostics have also been added in the outputs to make sure that the negative values are indeed small and unimportant in view of the advantages in using Ultimate-Macho

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/src/ICE/icethd_pnd.F90

    r9935 r9943  
    163163            !--- Pond gowth ---! 
    164164            ! v_ip should never be negative, otherwise code crashes 
    165             ! MV: as far as I saw, UM5 can create very small negative v_ip values (not Prather) 
    166165            v_ip_1d(ji) = MAX( 0._wp, v_ip_1d(ji) + zfr_mlt * zdv_mlt ) 
    167166            ! 
Note: See TracChangeset for help on using the changeset viewer.