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.
par_AMM_12km.h90 in branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC – NEMO

source: branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/par_AMM_12km.h90 @ 4409

Last change on this file since 4409 was 3432, checked in by trackstand2, 12 years ago

Merge branch 'ksection_partition'

File size: 5.0 KB
Line 
1   !!---------------------------------------------------------------------
2   !!                     ***  par_AMM_12km.h90  *** 
3   !!   Ocean Domain : 12km resolution atlantic  margin model
4   !!                  (AMM_12km configuration VN3.3)
5   !!---------------------------------------------------------------------
6   CHARACTER (len=16)        &
7#if !defined key_agrif
8      , PARAMETER  &
9#endif
10      ::    & 
11      cp_cfg = "amm"         !: name of the configuration
12   INTEGER                   &
13#if !defined key_agrif
14      , PARAMETER  &
15#endif
16      ::    & 
17      jp_cfg = 011  ,        &  !: resolution of the configuration (degrees)
18      ! Original data size
19      jpidta  = 198,        &  !: first horizontal dimension > or = to jpi
20      jpjdta  = 224,        &  !: second                     > or = to jpj
21      jpkdta  = 33,         &  !: number of levels           > or = to jpk
22      ! total domain matrix size
23      jpiglo  = jpidta,      &  !: first  dimension of global domain --> i
24      jpjglo  = jpjdta,      &  !: second dimension of global domain --> j
25      ! starting position of the zoom
26      jpizoom =   1   ,      &  !: left bottom (i,j) indices of the zoom
27      jpjzoom =   1   ,      &  !: in data indices
28      ! Domain characteristics
29      jperio  =    0  ,      &  !: lateral cond. type (between 0 and 6)
30      jpisl   =  150  ,      &  !: number of islands (irrelevent)
31      jpnisl  = 3000            !: maximum number of points per island
32
33   !!  Values set to pp_not_used indicates that this parameter is not used in THIS config.
34   !!  Values set to pp_to_be_computed  indicates that variables will be computed in domzgr
35   REAL,PARAMETER      ::  pp_not_used = 999999_wp , &
36      &                    pp_to_be_computed = 0._wp
37   !!
38   !! Coefficients associated with the horizontal coordinate system (jphgr_msh /= 0 )
39   !!
40   INTEGER, PARAMETER ::     & !
41      jphgr_msh = 0            !: type of horizontal mesh
42      !                        !  = 0 curvilinear coordinate on the sphere
43      !                        !      read in coordinate.nc file
44      !                        !  = 1 geographical mesh on the sphere
45      !                        !      with regular grid-spacing
46      !                        !  = 2 f-plane with regular grid-spacing
47      !                        !  = 3 beta-plane with regular grid-spacing
48      !                        !  = 4 Mercator grid with T/U point at the equator  with
49      !                        !      isotropic resolution (e1_deg)
50
51      !   ppglam0 , ppgphi0: coordinates of the lower leftmost T point of the grid.
52      !   The mercator grid starts only approximately at gphi0 because
53      !   of the constraint that the equator be a T point.
54   REAL(wp), PARAMETER ::       &  !
55      ppglam0  = pp_not_used,   &  !: longitude of first raw and column T-point (jphgr_msh = 1)
56      ppgphi0  = pp_not_used,   &  !: latitude  of first raw and column T-point (jphgr_msh = 1)
57      !                            !  latitude for the Coriolis or Beta parameter (jphgr_msh = 2 or 3)
58      ppe1_deg = pp_not_used,   &  !: zonal      grid-spacing (degrees)
59      ppe2_deg = pp_not_used,   &  !: meridional grid-spacing (degrees)
60      !
61      ppe1_m   = pp_not_used,   &  !: zonal      grid-spacing (meters )
62      ppe2_m   = pp_not_used       !: meridional grid-spacing (meters )
63
64   !!  Coefficients associated with the vertical coordinate system
65
66   REAL(wp), PARAMETER  ::       &
67      &     ppsur = pp_to_be_computed ,  &  !: Computed in domzgr, set ppdzmin and pphmax below
68      &     ppa0  = pp_to_be_computed ,  &  !:    "           "
69      &     ppa1  = pp_to_be_computed ,  &  !:    "           "
70      !
71      &     ppkth =  23.563_wp        ,  &  !: (non dimensional): gives the approximate
72      !                                     !: layer number above which  stretching will
73      !                                     !: be maximum. Usually of order jpk/2.
74      &     ppacr =    9.00000000000_wp     !: (non dimensional): stretching factor
75      !                                     !: for the grid. The highest zacr, the smallest
76      !                                     !: the stretching.
77
78   !!
79   !!  If both ppa0 ppa1 and ppsur are specified to 0, then
80   !!  they are computed from ppdzmin, pphmax , ppkth, ppacr in dom_zgr
81   !!
82   REAL(wp), PARAMETER ::        &
83      &     ppdzmin = 6._wp           ,  &  !: (meters) vertical thickness of the top layer
84      &     pphmax  = 5720._wp              !: (meters) Maximum depth of the ocean gdepw(jpk)
85   !!
86   LOGICAL,  PARAMETER ::                      &
87      &     ldbletanh = .FALSE.                   !: Use/do not use double tanf function for vertical coordinates
88   REAL(wp), PARAMETER ::                      &
89      &     ppa2    = pp_not_used           ,  &  !: Double tanh function parameters
90      &     ppkth2  = pp_not_used           ,  &  !:
91      &     ppacr2  = pp_not_used                 !:
92
93   !!---------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.