Ignore:
Timestamp:
2015-06-29T12:08:15+02:00 (5 years ago)
Author:
deazer
Message:

Adjusted small Bugfix to retain orginal order of statements in step.F90
Requires use of key_bdy.
Passes Sette
See Ticket: 1521
set dyn_apr to false in AMM12 for now before forcing files are updated on ftp site
to allow AMM12 sette to pass.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r5431 r5501  
    5353   USE timing           ! Timing 
    5454   USE sbcwave          ! Wave module 
     55   USE bdy_par          ! Require lk_bdy 
    5556 
    5657   IMPLICIT NONE 
     
    343344      !                                            ! ---------------------------------------- ! 
    344345      ! 
    345       IF( ln_apr_dyn ) CALL sbc_apr( kt )                ! atmospheric pressure provided at kt+0.5*nn_fsbc 
     346      IF ( .NOT. lk_bdy ) then 
     347         IF( ln_apr_dyn ) CALL sbc_apr( kt )                ! atmospheric pressure provided at kt+0.5*nn_fsbc 
     348      ENDIF 
    346349                                                         ! (caution called before sbc_ssm) 
    347350      ! 
Note: See TracChangeset for help on using the changeset viewer.