Changeset 2763


Ignore:
Timestamp:
2011-05-06T12:29:41+02:00 (10 years ago)
Author:
mafoipsl
Message:

Add sim variable output : sea ice and surface snow amount.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/CMIP5_IPSL/NEMO/LIM_SRC_2/limthd_2.F90

    r1758 r2763  
    440440      CALL iom_put( 'snowthic_cea', hsnif  (:,:) * fr_i(:,:) )   ! Snow thickness             [m] 
    441441      CALL iom_put( 'icethic_cea' , hicif  (:,:) * fr_i(:,:) )   ! Ice thickness              [m] 
     442      CALL iom_put( 'sim' , ( rhosn * hsnif  (:,:) + rhoic * hicif(:,:) ) * fr_i(:,:) )   ! sea ice and surface snow amount [kg/m2] 
    442443      zztmp = 1.0 / rdt_ice 
    443444      CALL iom_put( 'iceprod_cea' , hicifp (:,:) * zztmp     )   ! Ice produced               [m/s] 
Note: See TracChangeset for help on using the changeset viewer.