Changeset 11541 for NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/step.F90
- Timestamp:
- 2019-09-12T18:41:17+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/step.F90
r11529 r11541 114 114 IF( ln_apr_dyn ) CALL sbc_apr ( kstp ) ! atmospheric pressure (NB: call before bdy_dta which needs ssh_ib) 115 115 IF( ln_bdy ) CALL bdy_dta ( kstp, time_offset=+1 ) ! update dynamic & tracer data at open boundaries 116 IF( ln_isf .OR. ln_isfcpl) CALL isf_stp ( kstp )116 IF( ln_isf ) CALL isf_stp ( kstp ) 117 117 CALL sbc ( kstp ) ! Sea Boundary Condition (including sea-ice) 118 118 … … 242 242 CALL tra_sbc ( kstp ) ! surface boundary condition 243 243 IF( ln_traqsr ) CALL tra_qsr ( kstp ) ! penetrative solar radiation qsr 244 IF( ln_isf .OR. ln_isfcpl) CALL tra_isf ( kstp ) ! ice shelf heat flux244 IF( ln_isf ) CALL tra_isf ( kstp ) ! ice shelf heat flux 245 245 IF( ln_trabbc ) CALL tra_bbc ( kstp ) ! bottom heat flux 246 246 IF( ln_trabbl ) CALL tra_bbl ( kstp ) ! advective (and/or diffusive) bottom boundary layer scheme
Note: See TracChangeset
for help on using the changeset viewer.