New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 14782 for NEMO – NEMO

Changeset 14782 for NEMO


Ignore:
Timestamp:
2021-05-04T17:15:21+02:00 (3 years ago)
Author:
acc
Message:

Branch dev_r14318_RK3_stage1: minor changes to fix compilation errors with VORTEX test case. stp2d.F90 and stprk3_stg.F90 only. #2605

Location:
NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE/stp2d.F90

    r14547 r14782  
    2727   USE sbcapr         ! surface boundary condition: atmospheric pressure 
    2828   USE sbcwave,  ONLY : bhd_wave 
     29#if defined key_agrif 
     30   USE agrif_oce_interp 
     31#endif 
    2932 
    3033   PRIVATE 
    3134 
    3235   PUBLIC   stp_2D   ! called by nemogcm.F90 
     36   REAL (wp) :: r1_2 = 0.5_wp  
    3337 
    3438   !! * Substitutions 

  • NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE/stprk3_stg.F90

    r14618 r14782  
    355355# if defined key_agrif 
    356356            CALL Agrif_tra                     !* AGRIF zoom boundaries 
    357             CALL Agrif_dyn( kt ) 
     357            CALL Agrif_dyn( kstp ) 
    358358# endif 
    359359      !                                        ! local domain boundaries  (T-point, unchanged sign) 
Note: See TracChangeset for help on using the changeset viewer.