Changeset 4787 for trunk/NEMOGCM

Timestamp:

2014-09-25T16:16:38+02:00 (10 years ago)

Author:

clem

Message:

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

File:

• trunk/NEMOGCM/NEMO/LIM_SRC_3/limsbc.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/LIM_SRC_3/limsbc.F90

@@ -187 +187 @@
             ! mass flux at the ocean/ice interface
             fmmflx(ji,jj) = - wfx_ice(ji,jj) * rdt_ice                   ! F/M mass flux save at least for biogeochemical model
-            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)
+            emp(ji,jj)    = zemp - wfx_ice(ji,jj) - wfx_snw(ji,jj)       ! mass flux + F/M mass flux (always ice/ocean mass exchange)
             
          END DO