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_GYRE.h90 in trunk/NEMO/OFF_SRC – NEMO

source: trunk/NEMO/OFF_SRC/par_GYRE.h90 @ 973

Last change on this file since 973 was 719, checked in by ctlod, 16 years ago

get back to the nemo_v2_3 version for trunk

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 4.9 KB
Line 
1   !!---------------------------------------------------------------------
2   !!                     ***  par_GYRE.h90  ***
3   !!   Ocean Domain : GYRE configuration at 1/jp_cfg degree resolution
4   !!---------------------------------------------------------------------
5   !!----------------------------------------------------------------------
6   !!  OPA 9.0 , LOCEAN-IPSL (2005)
7   !! $Header$
8   !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt
9   !!----------------------------------------------------------------------
10   CHARACTER (len=16), PARAMETER ::   &  !:
11      cp_cfg = "gyre"           !: name of the configuration
12   INTEGER, PARAMETER ::     &  !:
13      jp_cfg =  1   ,        &  !:
14
15      ! data size              !!! * size of all the input files *
16      jpidta  = 30*jp_cfg+2, &  !: 1st horizontal dimension ( >= jpi )
17      jpjdta  = 20*jp_cfg+2, &  !: 2nd    "            "    ( >= jpj )
18      jpkdta  = 101,         &  !: number of levels         ( >= jpk )
19
20      ! global domain size     !!! * full domain *
21      jpiglo  = jpidta,      &  !: 1st dimension of global domain --> i
22      jpjglo  = jpjdta,      &  !: 2nd    "                  "    --> j
23      jpk     = jpkdta,      &  !: number of vertical levels
24      ! zoom starting position
25      jpizoom =   1   ,      &  !: left bottom (i,j) indices of the zoom
26      jpjzoom =   1   ,      &  !: in data indices
27
28      ! Domain characteristics
29      jperio  =     0 ,      &  !: lateral cond. type (between 0 and 6)
30      jpisl   =     1 ,      &  !: number of islands
31      jpnisl  = jpiglo          !: 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(wp), PARAMETER ::   &  !:
36      pp_not_used       = 999999._wp  , & !: ???
37      pp_to_be_computed =      0._wp      !: ???
38   !!
39   !! Coefficients associated with the horizontal coordinate system (jphgr_msh /= 0 )
40   !!
41   INTEGER,PARAMETER   ::    & !:
42      jphgr_msh = 5            !: type of horizontal mesh
43      !                        ! = 0 curvilinear coordinate on the sphere
44      !                        !     read in coordinate.nc file
45      !                        ! = 1 geographical mesh on the sphere
46      !                        !     with regular grid-spacing
47      !                        ! = 2 f-plane with regular grid-spacing
48      !                        ! = 3 beta-plane with regular grid-spacing
49      !                        ! = 4 Mercator grid with T/U point at the equator  with
50      !                        !     isotropic resolution (e1_deg)
51      !                        ! =5  beta-plane with regular grid-spacing and rotated domain (GYRE configuration)
52
53      !   ppglam0 , ppgphi0: coordinates of the lower leftmost T point of the grid.
54      !   The mercator grid starts only approximately at gphi0 because
55      !   of the constraint that the equator be a T point.
56   REAL(wp) ,PARAMETER ::     &  !:
57      ppglam0  =    0.0_wp,   &  !: longitude of first raw and column T-point (jphgr_msh = 1)
58      ppgphi0  =   29.0_wp,   &  !: latitude  of first raw and column T-point (jphgr_msh = 1)
59      !                          ! latitude for the Coriolis or Beta parameter (jphgr_msh = 2 or 3)
60      ppe1_deg = pp_not_used ,   &  !: zonal      grid-spacing (degrees)
61      ppe2_deg = pp_not_used ,   &  !: meridional grid-spacing (degrees)
62      !
63      ppe1_m   = pp_not_used,    &  !: zonal      grid-spacing (meters )
64      ppe2_m   = pp_not_used        !: meridional grid-spacing (meters )
65   !!
66   !!  Coefficients associated with the vertical coordinate system
67   !!
68
69   REAL(wp), PARAMETER  ::       &  !:
70      &     ppsur = 0.e0      ,  &  !: Computed in domzgr
71      &     ppa0  = 0.e0      ,  &  !:
72      &     ppa1  = 0.e0      ,  &  !:
73      !
74      &     ppkth =  17.28520372419791_wp   ,  &  !: (non dimensional): gives the approximate
75      !                                           !    layer number above which  stretching will
76      !                                           !    be maximum. Usually of order jpk/2.
77      &     ppacr =  5.000000000000000_wp         !: (non dimensional): stretching factor
78      !                                           !    for the grid. The highest zacr, the smallest
79      !                                           !    the stretching.
80
81   !!
82   !!  If all ppa0 ppa1 and ppsur are specified to 0, then
83   !!  they are computed from ppdzmin, pphmax , ppkth, ppacr in dom_zgr
84   !!
85   REAL(wp), PARAMETER ::        &  !:
86      &     ppdzmin = 1.0e0   ,  &  !: (meters): depth of the top (first) model layer
87      !                             !            depth of second "w" level
88      &     pphmax  = 5000.         !: (meters): maximum depth of the ocean
89      !                             !            depth of the last "w" level
90
91   !!---------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.