Changeset 9750 for NEMO/trunk/src/ICE/iceupdate.F90

Timestamp:

2018-06-06T14:49:34+02:00 (6 years ago)

Author:

clem

Message:

make ice ponds working in debug mode

File:

• NEMO/trunk/src/ICE/iceupdate.F90 (modified) (1 diff)

NEMO/trunk/src/ICE/iceupdate.F90

@@ -263 +263 @@
       IF( iom_use('hfxbog'     ) )   CALL iom_put ("hfxbog"     , hfx_bog             )   ! heat flux used for ice bottom growth 
       IF( iom_use('hfxbom'     ) )   CALL iom_put ("hfxbom"     , hfx_bom             )   ! heat flux used for ice bottom melt
-      IF( iom_use('hfxsum'     ) )   CALL iom_put ("hfxsum"     , hfx_sum             )   ! heat flux used for ice surface growth
+      IF( iom_use('hfxsum'     ) )   CALL iom_put ("hfxsum"     , hfx_sum             )   ! heat flux used for ice surface melt
       IF( iom_use('hfxopw'     ) )   CALL iom_put ("hfxopw"     , hfx_opw             )   ! heat flux used for ice formation in open water
       IF( iom_use('hfxdif'     ) )   CALL iom_put ("hfxdif"     , hfx_dif             )   ! heat flux used for ice temperature change