Changeset 109 for trunk/NEMO/OPA_SRC/DYN/dynzad.F90
- Timestamp:
- 2004-06-28T12:21:11+02:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/dynzad.F90
r106 r109 115 115 ua(ji,jj,jk) = ua(ji,jj,jk) + zua 116 116 va(ji,jj,jk) = va(ji,jj,jk) + zva 117 # if defined key_trddyn 117 # if defined key_trddyn || defined key_trd_vor 118 118 ! save the trends for diagnostics 119 119 utrd(ji,jj,jk,6) = zua … … 218 218 ua(ji,jj,jk) = ua(ji,jj,jk) + zua 219 219 va(ji,jj,jk) = va(ji,jj,jk) + zva 220 # if defined key_trddyn 220 # if defined key_trddyn || defined key_trd_vor 221 221 ! save the trends for diagnostics 222 222 utrd(ji,jj,jk,6) = zua
Note: See TracChangeset
for help on using the changeset viewer.