Changeset 109 for trunk/NEMO/OPA_SRC/DYN/dynldf_bilapg.F90
- Timestamp:
- 2004-06-28T12:21:11+02:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/dynldf_bilapg.F90
r106 r109 117 117 ua(ji,jj,jk) = ua(ji,jj,jk) + wk3(ji,jj,jk) 118 118 va(ji,jj,jk) = va(ji,jj,jk) + wk4(ji,jj,jk) 119 #if defined key_trddyn 119 #if defined key_trddyn || defined key_trd_vor 120 120 ! save the horizontal diffusive trends 121 121 utrd(ji,jj,jk,3) = wk3(ji,jj,jk)
Note: See TracChangeset
for help on using the changeset viewer.