- Timestamp:
- 2017-11-29T05:08:05+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/ROMS_WAD_7832/NEMOGCM/NEMO/OPA_SRC/DYN/dynvor.F90
r7753 r8841 181 181 ELSE ! total vorticity trend 182 182 CALL vor_een( kt, ntot, un , vn , ua, va ) ! total vorticity trend 183 IF( ln_stcor ) CALL vor_e ne( kt, ncor, usd, vsd, ua, va ) ! add the Stokes-Coriolis trend183 IF( ln_stcor ) CALL vor_een( kt, ncor, usd, vsd, ua, va ) ! add the Stokes-Coriolis trend 184 184 ENDIF 185 185 !
Note: See TracChangeset
for help on using the changeset viewer.