Changeset 4787


Ignore:
Timestamp:
2014-09-25T16:16:38+02:00 (6 years ago)
Author:
clem
Message:

bug in LIM3: loss of snow mass by sublimation was given to ocean while it should not.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/LIM_SRC_3/limsbc.F90

    r4765 r4787  
    187187            ! mass flux at the ocean/ice interface 
    188188            fmmflx(ji,jj) = - wfx_ice(ji,jj) * rdt_ice                   ! F/M mass flux save at least for biogeochemical model 
    189             emp(ji,jj)    = zemp - wfx_ice(ji,jj) - wfx_snw(ji,jj) - wfx_sub(ji,jj)   ! mass flux + F/M mass flux (always ice/ocean mass exchange) 
     189            emp(ji,jj)    = zemp - wfx_ice(ji,jj) - wfx_snw(ji,jj)       ! mass flux + F/M mass flux (always ice/ocean mass exchange) 
    190190             
    191191         END DO 
Note: See TracChangeset for help on using the changeset viewer.