Changeset 14725
- Timestamp:
- 2021-04-16T17:52:24+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/ENHANCE-01_davestorkey_fix_3D_momentum_trends/src/OCE/DYN/dynzdf.F90
r14724 r14725 444 444 ztrdu(:,:,:) = ( puu(:,:,:,Kaa) - ztrdu(:,:,:) ) / rDt 445 445 ztrdv(:,:,:) = ( pvv(:,:,:,Kaa) - ztrdv(:,:,:) ) / rDt 446 CALL trd_dyn( ztrdu, ztrdv, jpdyn_zdf, kt, Kmm )446 CALL trd_dyn( ztrdu, ztrdv, jpdyn_zdf, kt, Kmm, Kaa ) 447 447 ! 448 448 IF( ln_drgimp ) THEN
Note: See TracChangeset
for help on using the changeset viewer.