- Timestamp:
- 2021-02-19T17:06:46+01:00 (3 years ago)
- Location:
- NEMO/branches/2021/dev_r14393_HPC-03_Mele_Comm_Cleanup/cfgs
- Files:
-
- 1 deleted
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14393_HPC-03_Mele_Comm_Cleanup/cfgs/C1D_PAPA/MY_SRC/usrdef_nam.F90
r12377 r14511 39 39 CONTAINS 40 40 41 SUBROUTINE usr_def_nam( cd_cfg, kk_cfg, kpi, kpj, kpk, kperio)41 SUBROUTINE usr_def_nam( cd_cfg, kk_cfg, kpi, kpj, kpk, ldIperio, ldJperio, ldNFold, cdNFtype ) 42 42 !!---------------------------------------------------------------------- 43 43 !! *** ROUTINE dom_nam *** … … 51 51 !! ** input : - namusr_def namelist found in namelist_cfg 52 52 !!---------------------------------------------------------------------- 53 CHARACTER(len=*) , INTENT(out) :: cd_cfg ! configuration name 54 INTEGER , INTENT(out) :: kk_cfg ! configuration resolution 55 INTEGER , INTENT(out) :: kpi, kpj, kpk ! global domain sizes 56 INTEGER , INTENT(out) :: kperio ! lateral global domain b.c. 53 CHARACTER(len=*), INTENT(out) :: cd_cfg ! configuration name 54 INTEGER , INTENT(out) :: kk_cfg ! configuration resolution 55 INTEGER , INTENT(out) :: kpi, kpj, kpk ! global domain sizes 56 LOGICAL , INTENT(out) :: ldIperio, ldJperio ! i- and j- periodicity 57 LOGICAL , INTENT(out) :: ldNFold ! North pole folding 58 CHARACTER(len=1), INTENT(out) :: cdNFtype ! Folding type: T or F 57 59 ! 58 60 INTEGER :: ios ! Local integer … … 74 76 kpk = 75 75 77 ! ! Set the lateral boundary condition of the global domain 76 kperio = 7 ! C1D configuration : 3x3 basin with cyclic Est-West and Norht-South condition 78 ldIperio = .TRUE. ; ldJperio = .TRUE. ! C1D configuration : 3x3 basin with cyclic Est-West and Norht-South condition 79 ldNFold = .FALSE. ; cdNFtype = '-' 77 80 ! 78 81 ! ! control print … … 90 93 WRITE(numout,*) ' jpjglo = ', kpj 91 94 WRITE(numout,*) ' jpkglo = ', kpk 92 WRITE(numout,*) ' Lateral boundary condition of the global domain' 93 WRITE(numout,*) ' C1D : closed basin jperio = ', kperio 95 WRITE(numout,*) ' ' 94 96 ENDIF 95 97 ! -
NEMO/branches/2021/dev_r14393_HPC-03_Mele_Comm_Cleanup/cfgs/README.rst
r11743 r14511 240 240 The vertical eddy viscosity and diffusivity coefficients are increased to 1 m\ :sup:`2`/s in 241 241 case of static instability. 242 :time step: is 5 760sec (1h36') so that there is 15time steps in one day.242 :time step: is 5400sec (1h30') so that there is 16 time steps in one day. 243 243 244 244 ORCA2_OFF_PISCES -
NEMO/branches/2021/dev_r14393_HPC-03_Mele_Comm_Cleanup/cfgs/SHARED/namelist_ref
r14255 r14511 644 644 rn_test_box = 108.0, 116.0, -66.0, -58.0 645 645 ln_use_calving = .false. ! Use calving data even when nn_test_icebergs > 0 646 rn_speed_limit = 0. ! CFL speed limit for a berg 646 rn_speed_limit = 0. ! CFL speed limit for a berg (safe value is 0.4, see #2581) 647 647 ! 648 648 ln_M2016 = .false. ! use Merino et al. (2016) modification (use of 3d ocean data instead of only sea surface data) … … 1498 1498 jpnj = 0 ! number of processors following j (set automatically if < 1), see also ln_listonly = T 1499 1499 nn_hls = 1 ! halo width (applies to both rows and columns) 1500 nn_comm = 1 ! comm choice 1500 1501 / 1501 1502 !-----------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.