Changeset 11053 for NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps_rewrite_time_filterswap/src/OCE/TRD/trddyn.F90
- Timestamp:
- 2019-05-24T12:53:06+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps_rewrite_time_filterswap/src/OCE/TRD/trddyn.F90
r10946 r11053 123 123 z3dx(:,:,:) = 0._wp ! U.dxU & V.dyV (approximation) 124 124 z3dy(:,:,:) = 0._wp 125 DO jk = 1, jpkm1 ! no mask as u n,vnare masked125 DO jk = 1, jpkm1 ! no mask as uu, vv are masked 126 126 DO jj = 2, jpjm1 127 127 DO ji = 2, jpim1
Note: See TracChangeset
for help on using the changeset viewer.