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 9102 for branches/2017/dev_merge_2017 – NEMO

Ignore:
Timestamp:
2017-12-15T18:52:43+01:00 (6 years ago)
Author:
flavoni
Message:

fix

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90

    r9090 r9102  
    11961196 
    11971197      ! Lateral boundary conditions 
    1198       CALL lbc_lnk_multi( zfmask, 'F', 1. , fmask, 'F', 1., bdyumask, 'U', 1. , bdyvmask, 'V', 1., bdytmask, 'T', 1. ) 
     1198      CALL lbc_lnk_multi( zfmask, 'F', 1. , fmask, 'F', 1.)  
     1199      CALL lbc_lnk_multi( bdyumask, 'U', 1. , bdyvmask, 'V', 1., bdytmask, 'T', 1. ) 
    11991200      DO ib_bdy = 1, nb_bdy       ! Indices and directions of rim velocity components 
    12001201 
Note: See TracChangeset for help on using the changeset viewer.