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 15368 for NEMO/trunk/src/OCE/BDY/bdydta.F90 – NEMO

Ignore:
Timestamp:
2021-10-14T10:25:34+02:00 (3 years ago)
Author:
smasson
Message:

trunk: final version (hopefully) for ticket #2731

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/BDY/bdydta.F90

    r15360 r15368  
    258258            END DO 
    259259         ENDIF   ! ltotvel 
    260          IF( bf_alias(jp_bdyv3d)%ltotvel ) THEN     ! if we read 3D total velocity (can be true only if u3d was read) 
     260         IF( bf_alias(jp_bdyv3d)%ltotvel ) THEN     ! if we read 3D total velocity (can be true only if v3d was read) 
    261261            igrd = 3                       ! meridional velocity 
    262262            DO ib = 1, idx_bdy(jbdy)%nblen(igrd) 
Note: See TracChangeset for help on using the changeset viewer.