- Timestamp:
- 2015-11-06T11:42:35+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/TOP_SRC/TRP/trcnxt.F90
r5656 r5866 137 137 ELSE 138 138 ! Leap-Frog + Asselin filter time stepping 139 IF( l k_vvl ) THEN ; CALL tra_nxt_vvl( kt, nittrc000, rdttrc, 'TRC', trb, trn, tra, &140 & sbc_trc, sbc_trc_b, jptra ) ! variable volume level (vvl)141 ELSE ; CALL tra_nxt_fix( kt, nittrc000, 'TRC', trb, trn, tra, jptra ) ! fixed volume level139 IF( ln_linssh ) THEN ; CALL tra_nxt_fix( kt, nittrc000, 'TRC', trb, trn, tra, jptra ) ! linear ssh 140 ELSE ; CALL tra_nxt_vvl( kt, nittrc000, rdttrc, 'TRC', trb, trn, tra, & 141 & sbc_trc, sbc_trc_b, jptra ) ! non-linear ssh 142 142 ENDIF 143 143 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.