New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 14474 for NEMO/branches/UKMO/NEMO_4.0.4_GO8_package/src/ICE/icewri.F90 – NEMO

Ignore:
Timestamp:
2021-02-17T15:39:01+01:00 (3 years ago)
Author:
edblockley
Message:

Adding new diagnostic for effective melt-pond fraction (per grid-cell not per ice area). This diagnostic is best for comparison with satllite productsand as a true reflection of the pond field that the radiation scheme "sees".

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/UKMO/NEMO_4.0.4_GO8_package/src/ICE/icewri.F90

    r14302 r14474  
    116116      IF( iom_use('icehpnd' ) )   CALL iom_put( 'icehpnd', hm_ip  * zmsk00      )                                           ! melt pond depth 
    117117      IF( iom_use('icevpnd' ) )   CALL iom_put( 'icevpnd', vt_ip  * zmsk00      )                                           ! melt pond total volume per unit area 
     118      IF( iom_use('iceepnd' ) )   CALL iom_put( 'iceepnd', SUM( a_ip_eff * a_i, dim=3 ) * zmsk00  )                         ! melt pond total effective fraction per cell area 
    118119      IF( iom_use('icehlid' ) )   CALL iom_put( 'icehlid', hm_il  * zmsk00      )                                           ! melt pond lid depth 
    119120      IF( iom_use('icevlid' ) )   CALL iom_put( 'icevlid', vt_il  * zmsk00      )                                           ! melt pond lid total volume per unit area 
Note: See TracChangeset for help on using the changeset viewer.