Changeset 13746 for NEMO/branches/2019/dev_r11842_SI3-10_EAP/src/ICE/icewri.F90

Timestamp:

2020-11-08T22:25:28+01:00 (3 years ago)

Author:

stefryn

Message:

update test case

File:

• NEMO/branches/2019/dev_r11842_SI3-10_EAP/src/ICE/icewri.F90 (modified) (1 diff)

NEMO/branches/2019/dev_r11842_SI3-10_EAP/src/ICE/icewri.F90

@@ -254 +254 @@
       CALL iom_rstput( 0, 0, kid, 'sivolu', vt_i         )   ! Ice volume
       CALL iom_rstput( 0, 0, kid, 'sidive', divu_i*1.0e8 )   ! Ice divergence
+      CALL iom_rstput( 0, 0, kid, 'sishea', shear_i*1.0e8 )   ! Ice shear
       CALL iom_rstput( 0, 0, kid, 'si_amp', at_ip        )   ! Melt pond fraction
       CALL iom_rstput( 0, 0, kid, 'si_vmp', vt_ip        )   ! Melt pond volume