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 14885 – NEMO

Changeset 14885


Ignore:
Timestamp:
2021-05-19T11:10:11+02:00 (3 years ago)
Author:
clem
Message:

4.0-HEAD ICE: the diagnostic of heat flux for ice surface melt was not outputed because of initialization problem

Location:
NEMO/releases/r4.0/r4.0-HEAD/src/ICE
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • NEMO/releases/r4.0/r4.0-HEAD/src/ICE/icestp.F90

    r14026 r14885  
    455455               qcn_ice    (ji,jj,jl) = 0._wp   ! conductive flux (ln_cndflx=T & ln_cndemule=T) 
    456456               qtr_ice_bot(ji,jj,jl) = 0._wp   ! part of solar radiation transmitted through the ice needed at least for outputs 
     457               qml_ice    (ji,jj,jl) = 0._wp   ! surface melt heat flux 
    457458            END DO 
    458459         END DO 

  • NEMO/releases/r4.0/r4.0-HEAD/src/ICE/icethd.F90

    r14026 r14885  
    550550         CALL tab_1d_2d( npti, nptidx(1:npti), qcn_ice_bot_1d(1:npti), qcn_ice_bot(:,:,kl) ) 
    551551         CALL tab_1d_2d( npti, nptidx(1:npti), qcn_ice_top_1d(1:npti), qcn_ice_top(:,:,kl) ) 
     552         CALL tab_1d_2d( npti, nptidx(1:npti), qml_ice_1d    (1:npti), qml_ice    (:,:,kl) ) 
    552553         ! extensive variables 
    553554         CALL tab_1d_2d( npti, nptidx(1:npti), v_i_1d (1:npti), v_i (:,:,kl) ) 
Note: See TracChangeset for help on using the changeset viewer.