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 4328 for branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/TRA – NEMO

Ignore:
Timestamp:
2013-12-06T11:25:13+01:00 (10 years ago)
Author:
davestorkey
Message:

Remove OBC module at NEMO 3.6. See ticket #1189.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/TRA/tranxt.F90

    r4230 r4328  
    3434   USE trdtra          ! ocean active tracers trends  
    3535   USE phycst 
    36    USE obc_oce 
    37    USE obctra          ! open boundary condition (obc_tra routine) 
    3836   USE bdy_oce 
    3937   USE bdytra          ! open boundary condition (bdy_tra routine) 
     
    8179      !!              - Apply lateral boundary conditions on (ta,sa)  
    8280      !!             at the local domain   boundaries through lbc_lnk call,  
    83       !!             at the one-way open boundaries (lk_obc=T),  
     81      !!             at the one-way open boundaries (lk_bdy=T),  
    8482      !!             at the AGRIF zoom     boundaries (lk_agrif=T) 
    8583      !! 
     
    112110      CALL lbc_lnk( tsa(:,:,:,jp_sal), 'T', 1._wp ) 
    113111      ! 
    114 #if defined key_obc  
    115       IF( lk_obc )   CALL obc_tra( kt )  ! OBC open boundaries 
    116 #endif 
    117112#if defined key_bdy  
    118113      IF( lk_bdy )   CALL bdy_tra( kt )  ! BDY open boundaries 
Note: See TracChangeset for help on using the changeset viewer.