- Timestamp:
- 2010-06-25T16:58:03+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/DEV_r1784_mid_year_merge_2010/NEMO/TOP_SRC/PISCES/trcrst_pisces.F90
r1953 r1970 263 263 #if defined key_dtatrc 264 264 ! Restore close seas values to initial data 265 nmonth = 1 266 nday = 1 267 CALL trc_dta( nittrc000) 265 CALL trc_dta( nittrc000 ) 268 266 DO jn = 1, jptra 269 267 IF( lutini(jn) ) THEN
Note: See TracChangeset
for help on using the changeset viewer.