Changeset 156 for trunk/NEMO/OPA_SRC/DTA/dtatem.F90
- Timestamp:
- 2004-10-19T15:37:38+02:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DTA/dtatem.F90
r114 r156 91 91 INTEGER :: & 92 92 imois, iman, itime, ik , & ! temporary integers 93 i15, ipi, ipj, ipk, & ! " " 94 il0, il1, ii0, ii1, ij0, ij1 ! " " 93 i15, ipi, ipj, ipk ! " " 94 # if defined key_tradmp 95 INTEGER :: & 96 il0, il1, ii0, ii1, ij0, ij1 ! temporary integers 97 # endif 95 98 96 99 INTEGER, DIMENSION(jpmois) :: istep
Note: See TracChangeset
for help on using the changeset viewer.