Changeset 6764


Ignore:
Timestamp:
2016-06-30T17:50:52+02:00 (4 years ago)
Author:
clem
Message:

output for landfast ice

Location:
branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/CONFIG/SHARED/field_def.xml

    r6684 r6764  
    303303         <field id="icevolu"      long_name="ice volume"                                                   unit="m"        /> 
    304304         <field id="snowvol"      long_name="snow volume"                                                  unit="m"        /> 
     305         <field id="tau_icebfr"   long_name="ice friction on ocean bottom for landfast ice"                unit="N"        /> 
    305306 
    306307         <field id="icetrp"       long_name="ice volume transport"                                         unit="m/day"          /> 
  • branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/LIM_SRC_3/limwri.F90

    r6763 r6764  
    100100         CALL iom_put( "icevel"       , z2d   * zswi     )       ! ice velocity module 
    101101      ENDIF 
     102 
     103      IF ( iom_use( "tau_icebfr" ) )    CALL iom_put( "tau_icebfr"  , tau_icebfr * zswi      )  ! ice friction with ocean bottom (landfast ice)   
    102104      ! 
    103105      IF ( iom_use( "miceage" ) )       CALL iom_put( "miceage"     , om_i * zswi * z1_365   )  ! mean ice age 
     
    193195      ! Output values for each category 
    194196      !-------------------------------- 
    195       CALL iom_put( "iceconc_cat"      , a_i   * zswi2   )        ! area for categories 
    196       CALL iom_put( "icethic_cat"      , ht_i  * zswi2   )        ! thickness for categories 
    197       CALL iom_put( "snowthic_cat"     , ht_s  * zswi2   )        ! snow depth for categories 
    198       CALL iom_put( "salinity_cat"     , sm_i  * zswi2   )        ! salinity for categories 
    199  
     197      IF ( iom_use( "iceconc_cat"  ) )  CALL iom_put( "iceconc_cat"      , a_i   * zswi2   )        ! area for categories 
     198      IF ( iom_use( "icethic_cat"  ) )  CALL iom_put( "icethic_cat"      , ht_i  * zswi2   )        ! thickness for categories 
     199      IF ( iom_use( "snowthic_cat" ) )  CALL iom_put( "snowthic_cat"     , ht_s  * zswi2   )        ! snow depth for categories 
     200      IF ( iom_use( "salinity_cat" ) )  CALL iom_put( "salinity_cat"     , sm_i  * zswi2   )        ! salinity for categories 
    200201      ! ice temperature 
    201       IF ( iom_use( "icetemp_cat" ) )  CALL iom_put( "icetemp_cat", ( SUM( t_i(:,:,:,:), dim=3 ) * r1_nlay_i - rt0 ) * zswi2 ) 
    202        
     202      IF ( iom_use( "icetemp_cat"  ) )  CALL iom_put( "icetemp_cat", ( SUM( t_i(:,:,:,:), dim=3 ) * r1_nlay_i - rt0 ) * zswi2 ) 
    203203      ! snow temperature 
    204       IF ( iom_use( "snwtemp_cat" ) )  CALL iom_put( "snwtemp_cat", ( SUM( t_s(:,:,:,:), dim=3 ) * r1_nlay_s - rt0 ) * zswi2 ) 
    205  
     204      IF ( iom_use( "snwtemp_cat"  ) )  CALL iom_put( "snwtemp_cat", ( SUM( t_s(:,:,:,:), dim=3 ) * r1_nlay_s - rt0 ) * zswi2 ) 
    206205      ! ice age 
    207       IF ( iom_use( "iceage_cat" ) )   CALL iom_put( "iceage_cat" , o_i * zswi2 * z1_365 ) 
    208  
     206      IF ( iom_use( "iceage_cat"   ) )  CALL iom_put( "iceage_cat" , o_i * zswi2 * z1_365 ) 
    209207      ! brine volume 
    210       IF ( iom_use( "brinevol_cat" ) ) CALL iom_put( "brinevol_cat", bv_i * 100. * zswi2 ) 
     208      IF ( iom_use( "brinevol_cat" ) )  CALL iom_put( "brinevol_cat", bv_i * 100. * zswi2 ) 
    211209 
    212210      !     !  Create an output files (output.lim.abort.nc) if S < 0 or u > 20 m/s 
Note: See TracChangeset for help on using the changeset viewer.