Ignore:
Timestamp:
2018-12-19T22:54:16+01:00 (3 years ago)
Author:
smasson
Message:

trunk: merge back dev_r10164_HPC09_ESIWACE_PREP_MERGE@10424 into the trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/tests/LOCK_EXCHANGE/MY_SRC/usrdef_zgr.F90

    r10074 r10425  
    8888      ! the ocean basin surrounded by land (1 grid-point) set through lbc_lnk call as jperio=0  
    8989      z2d(:,:) = 1._wp                    ! surface ocean is the 1st level 
    90       CALL lbc_lnk( z2d, 'T', 1. )        ! closed basin since jperio = 0 (see userdef_nam.F90) 
     90      CALL lbc_lnk( 'usrdef_zgr', z2d, 'T', 1. )        ! closed basin since jperio = 0 (see userdef_nam.F90) 
    9191      k_top(:,:) = NINT( z2d(:,:) ) 
    9292      ! 
Note: See TracChangeset for help on using the changeset viewer.