- Timestamp:
- 2021-01-27T17:12:40+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14312_MPI_Interface/tests/CANAL/MY_SRC/usrdef_nam.F90
r14346 r14355 104 104 #endif 105 105 ! 106 IF(lwm) WRITE( numond, namusr_def )107 !108 106 cd_cfg = 'EW_CANAL' ! name & resolution (not used) 109 107 kk_cfg = INT( rn_dx ) … … 111 109 IF( Agrif_Root() ) THEN ! Global Domain size: EW_CANAL global domain is 1800 km x 1800 Km x 5000 m 112 110 kpi = NINT( rn_domszx / rn_dx ) + 1 113 kpj = NINT( rn_domszy / rn_dy ) + 3111 kpj = NINT( rn_domszy / rn_dy ) + 1 114 112 ELSE ! Global Domain size: add nbghostcells + 1 "land" point on each side 115 113 kpi = nbcellsx + nbghostcells_x + nbghostcells_x + 2
Note: See TracChangeset
for help on using the changeset viewer.