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 15249 for NEMO/trunk/src/SWE/stpmlf.F90 – NEMO

Ignore:
Timestamp:
2021-09-13T11:59:09+02:00 (3 years ago)
Author:
hadcv
Message:

#2721: Fix SETTE debug failures

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/SWE/stpmlf.F90

    r14433 r15249  
    199199      CALL lbc_lnk( 'stp_MLF', uu(:,:,:,Nnn), 'U', -1., vv(:,:,:,Nnn), 'V', -1.,   &   !* local domain boundaries 
    200200         &                     uu(:,:,:,Naa), 'U', -1., vv(:,:,:,Naa), 'V', -1.    )      
     201      IF (nn_hls==2) CALL lbc_lnk( 'stp_MLF', r3u(:,:,Naa), 'U', 1., r3v(:,:,Naa), 'V', 1.) 
    201202 
    202203      !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
Note: See TracChangeset for help on using the changeset viewer.