Changeset 8150 for branches/2016/v3_6_CMIP6_ice_diagnostics/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90

Timestamp:

2017-06-07T16:37:36+02:00 (7 years ago)

Author:

vancop

Message:

SIMIP outputs, phase 2

File:

• branches/2016/v3_6_CMIP6_ice_diagnostics/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90 (modified) (2 diffs)

branches/2016/v3_6_CMIP6_ice_diagnostics/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90

@@ -595 +595 @@
       wfx_res(:,:) = 0._wp   ;   wfx_sub(:,:) = 0._wp
       wfx_spr(:,:) = 0._wp   ;   
+
+      wfx_snw_dyn(:,:) = 0._wp ; wfx_snw_sum(:,:) = 0._wp
       
       hfx_thd(:,:) = 0._wp   ;   
@@ -613 +615 @@
 
       ! SIMIP diagnostics
-      diag_dms_mel(:,:)  = 0._wp ; diag_dms_dyn(:,:)  = 0._wp
-      diag_dmtx_dyn(:,:) = 0._wp ; diag_dmty_dyn(:,:) = 0._wp
+      diag_dms_sum(:,:)  = 0._wp ; diag_dms_dyn(:,:)  = 0._wp
+      diag_dmi_dyn(:,:)  = 0._wp ;
       diag_fc_bo(:,:)    = 0._wp ; diag_fc_su(:,:)    = 0._wp