Changeset 6764
- Timestamp:
- 2016-06-30T17:50:52+02:00 (9 years ago)
- 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 303 303 <field id="icevolu" long_name="ice volume" unit="m" /> 304 304 <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" /> 305 306 306 307 <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 100 100 CALL iom_put( "icevel" , z2d * zswi ) ! ice velocity module 101 101 ENDIF 102 103 IF ( iom_use( "tau_icebfr" ) ) CALL iom_put( "tau_icebfr" , tau_icebfr * zswi ) ! ice friction with ocean bottom (landfast ice) 102 104 ! 103 105 IF ( iom_use( "miceage" ) ) CALL iom_put( "miceage" , om_i * zswi * z1_365 ) ! mean ice age … … 193 195 ! Output values for each category 194 196 !-------------------------------- 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 200 201 ! 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 ) 203 203 ! 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 ) 206 205 ! 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 ) 209 207 ! 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 ) 211 209 212 210 ! ! 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.