- Timestamp:
- 2016-03-10T15:12:49+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/step.F90
r6140 r6381 172 172 ENDIF 173 173 ENDIF 174 ! ! eddy diffusivity coeff. and/or eiv coeff. 175 IF( l_ldftra_time .OR. l_ldfeiv_time ) CALL ldf_tra( kstp ) 174 ! ! eddy diffusivity coeff. 175 IF( l_ldftra_time .OR. l_ldfeiv_time ) CALL ldf_tra( kstp ) ! and/or eiv coeff. 176 IF( l_ldfdyn_time ) CALL ldf_dyn( kstp ) ! eddy viscosity coeff. 176 177 177 178 !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> … … 203 204 204 205 IF( lk_asminc .AND. ln_asmiau .AND. ln_dyninc ) & 205 206 & CALL dyn_asm_inc ( kstp ) ! apply dynamics assimilation increment 206 207 IF( lk_bdy ) CALL bdy_dyn3d_dmp ( kstp ) ! bdy damping trends 207 208 #if defined key_agrif
Note: See TracChangeset
for help on using the changeset viewer.