Changeset 608 for trunk/NEMO/OPA_SRC
- Timestamp:
- 2007-02-20T18:27:32+01:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/dynspg_ts_jki.F90
r575 r608 390 390 ! Time filter and swap of dynamics arrays 391 391 ! --------------------------------------- 392 IF( neuler == 0 .AND. kt == nit000 ) THEN! Euler (forward) time stepping392 IF( neuler == 0 .AND. jit == 1 ) THEN ! Euler (forward) time stepping 393 393 zsshb_e(:,jj) = sshn_e(:,jj) 394 394 zub_e (:,jj) = zun_e (:,jj)
Note: See TracChangeset
for help on using the changeset viewer.