Changeset 11050 for NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps_rewrite_time_filterswap/src/OCE/stpctl.F90
- Timestamp:
- 2019-05-24T10:27:58+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps_rewrite_time_filterswap/src/OCE/stpctl.F90
r10965 r11050 42 42 CONTAINS 43 43 44 SUBROUTINE stp_ctl( kt, K mm, kindic )44 SUBROUTINE stp_ctl( kt, Kbb, Kmm, kindic ) 45 45 !!---------------------------------------------------------------------- 46 46 !! *** ROUTINE stp_ctl *** … … 60 60 !!---------------------------------------------------------------------- 61 61 INTEGER, INTENT(in ) :: kt ! ocean time-step index 62 INTEGER, INTENT(in ) :: K mm ! ocean time level index62 INTEGER, INTENT(in ) :: Kbb, Kmm ! ocean time level index 63 63 INTEGER, INTENT(inout) :: kindic ! error indicator 64 64 !!
Note: See TracChangeset
for help on using the changeset viewer.