Changeset 12461 for NEMO/branches/UKMO/r12083_cpl-pressure/src/OCE/step.F90

Timestamp:

2020-02-25T18:24:46+01:00 (4 years ago)

Author:

jcastill

Message:

Changes as the original branch updated to vn4.1

File:

• NEMO/branches/UKMO/r12083_cpl-pressure/src/OCE/step.F90 (modified) (1 diff)

NEMO/branches/UKMO/r12083_cpl-pressure/src/OCE/step.F90

@@ -111 +111 @@
       !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
       IF( ln_tide    )   CALL sbc_tide( kstp )                   ! update tide potential
-      IF( ln_apr_dyn )   CALL sbc_apr ( kstp )                   ! atmospheric pressure (NB: call before bdy_dta which needs ssh_ib) 
-      IF( ln_bdy     )   CALL bdy_dta ( kstp, kt_offset = +1 )   ! update dynamic & tracer data at open boundaries
                          CALL sbc     ( kstp )                   ! Sea Boundary Condition (including sea-ice)