- Timestamp:
- 2011-11-16T10:25:18+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/TOP_SRC/LOBSTER/trcexp.F90
r3116 r3124 126 126 ! Time filter and swap of arrays 127 127 ! ------------------------------ 128 IF( neuler == 0 .AND. kt == nit 000 ) THEN ! Euler time-stepping at first time-step128 IF( neuler == 0 .AND. kt == nittrc000 ) THEN ! Euler time-stepping at first time-step 129 129 ! ! (only swap) 130 130 sedpocn(:,:) = sedpoca(:,:)
Note: See TracChangeset
for help on using the changeset viewer.