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 14355 – NEMO

Changeset 14355


Ignore:
Timestamp:
2021-01-27T17:12:40+01:00 (3 years ago)
Author:
smasson
Message:

dev_r14312_MPI_Interface: update CANAL and TSUNAMI tests, missing part of [14346], #2598

Location:
NEMO/branches/2021/dev_r14312_MPI_Interface/tests
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2021/dev_r14312_MPI_Interface/tests/CANAL/MY_SRC/usrdef_nam.F90

    r14346 r14355  
    104104#endif 
    105105      ! 
    106       IF(lwm)   WRITE( numond, namusr_def ) 
    107       ! 
    108106      cd_cfg = 'EW_CANAL'             ! name & resolution (not used) 
    109107      kk_cfg = INT( rn_dx ) 
     
    111109      IF( Agrif_Root() ) THEN        ! Global Domain size:  EW_CANAL global domain is  1800 km x 1800 Km x 5000 m 
    112110         kpi = NINT( rn_domszx / rn_dx ) + 1 
    113          kpj = NINT( rn_domszy / rn_dy ) + 3 
     111         kpj = NINT( rn_domszy / rn_dy ) + 1 
    114112      ELSE                           ! Global Domain size: add nbghostcells + 1 "land" point on each side 
    115113         kpi  = nbcellsx + nbghostcells_x   + nbghostcells_x   + 2 
  • NEMO/branches/2021/dev_r14312_MPI_Interface/tests/TSUNAMI/MY_SRC/usrdef_nam.F90

    r14346 r14355  
    8787#endif 
    8888      ! 
    89       IF(lwm)   WRITE( numond, namusr_def ) 
    90       ! 
    9189      cd_cfg = 'TSUNAMI'             ! name & resolution (not used) 
    9290      kk_cfg = INT( rn_dx ) 
     
    9492      IF( Agrif_Root() ) THEN        ! Global Domain size:  TSUNAMI global domain is  1800 km x 1800 Km x 5000 m 
    9593         kpi = NINT( rn_domszx / rn_dx ) + 1 
    96          kpj = NINT( rn_domszy / rn_dy ) + 3 
     94         kpj = NINT( rn_domszy / rn_dy ) + 1 
    9795      ELSE                           ! Global Domain size: add nbghostcells + 1 "land" point on each side 
    9896         kpi  = nbcellsx + nbghostcells_x   + nbghostcells_x   + 2 
Note: See TracChangeset for help on using the changeset viewer.