Changeset 8496
 Timestamp:
 20170905T15:03:08+02:00 (6 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icevar.F90
r8491 r8496 128 128 ! 129 129 ! ! mean temperature (K), salinity and age 130 tm_su(:,:) = SUM( t_su(:,:,:) * a_i(:,:,:) , dim=3 ) * z1_at_i( ji,jj)131 tm_si(:,:) = SUM( t_si(:,:,:) * a_i(:,:,:) , dim=3 ) * z1_at_i( ji,jj)132 om_i (:,:) = SUM( oa_i(:,:,:) , dim=3 ) * z1_at_i( ji,jj)130 tm_su(:,:) = SUM( t_su(:,:,:) * a_i(:,:,:) , dim=3 ) * z1_at_i(:,:) 131 tm_si(:,:) = SUM( t_si(:,:,:) * a_i(:,:,:) , dim=3 ) * z1_at_i(:,:) 132 om_i (:,:) = SUM( oa_i(:,:,:) , dim=3 ) * z1_at_i(:,:) 133 133 ! 134 134 tm_i (:,:) = 0._wp
Note: See TracChangeset
for help on using the changeset viewer.