source: trunk/NEMO/OPA_SRC/par_ORCA_R05.h90 @ 392

Last change on this file since 392 was 392, checked in by opalod, 15 years ago

RB:nemo_v1_update_038: first integration of Agrif :

  • add agrif to dynspg_flt_jki.F90
  • cosmetic change of key_AGRIF in key_agrif
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 6.6 KB
Line 
1   !!---------------------------------------------------------------------
2   !!                     ***  par_ORCA_R05.h90  *** 
3   !!   Ocean Domain : 0.5 degrees resolution global ocean
4   !!                  (0RCA_R05 configuration)
5   !!---------------------------------------------------------------------
6   !!----------------------------------------------------------------------
7   !!  OPA 9.0 , LOCEAN-IPSL (2005)
8   !! $Header$
9   !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt
10   !!----------------------------------------------------------------------
11   CHARACTER (len=16)      &
12#if !defined key_agrif
13      , PARAMETER  &
14#endif
15      ::    & 
16      cp_cfg = "orca"           !: name of the configuration
17   INTEGER     &
18#if !defined key_agrif
19      , PARAMETER  &
20#endif
21      :: &
22      jp_cfg = 05  ,         &  !: resolution of the configuration (degrees)
23
24      ! data size              !!! * size of all the input files *
25      jpidta  = 722,         &  !: 1st lateral dimension > or = to jpiglo
26      jpjdta  = 511,         &  !: 2nd   "         "     > or = to jpjglo
27      jpkdta  =  31             !: number of levels      > or = to jpkglo
28
29#if defined key_antarctic
30      ! zoom domain size       !!! *  antarctic zoom  *
31   INTEGER     &
32#if !defined key_agrif
33      , PARAMETER  &
34#endif
35      :: &
36      jpiglo  = jpidta,      &  !: 1st dimension of global domain --> i
37      jpjglo  = 187   ,      &  !: 2nd     "                 "    --> j
38      jpk     = jpkdta,      &  !: number of vertical levels
39      ! starting position of the zoom
40      jpizoom =   1   ,      &  !: left bottom (i,j) indices of the zoom
41      jpjzoom =   1   ,      &  !: in data domain indices
42      ! Domain characteristics
43      jperio  =   1   ,      &  !: lateral cond. type (between 0 and 6)
44      jpisl   =   1   ,      &  !: number of islands
45      jpnisl  =   1             !: maximum number of points per island
46
47#elif defined key_arctic
48      ! zoom domain size       !!! *  arctic zoom  *
49   INTEGER    &
50#if !defined key_agrif
51      , PARAMETER  &
52#endif
53      :: &
54      ! zoom domain size       !!! *  arctic zoom  *
55      jpiglo  = 562,         &  !: 1st dimension of global domain --> i
56      jpjglo  = jpjdta-301+1,&  !: 2nd     "                 "    --> j
57      jpk     = jpkdta,      &  !: number of vertical levels
58      ! zoom starting position
59      jpizoom =  81   ,      &  !: left bottom (i,j) indices of the zoom
60      jpjzoom = 301   ,      &  !: in data domain indices
61      ! Domain characteristics
62      jperio  =   5   ,      &  !: lateral cond. type (between 0 and 6)
63      jpisl   =   1   ,      &  !: number of islands
64      jpnisl  =   1             !: maximum number of points per island
65
66#else
67      ! global domain size     !!! *  global domain  *
68   INTEGER    &
69#if !defined key_agrif
70      , PARAMETER  &
71#endif
72      :: &
73      jpiglo  = jpidta,      &  !: 1st dimension of global domain --> i
74      jpjglo  = jpjdta,      &  !: 2nd     "                 "    --> j
75      jpk     = jpkdta,      &  !: number of vertical levels
76      ! zoom starting position   
77      jpizoom =   1   ,      &  !: left bottom (i,j) indices of the zoom
78      jpjzoom =   1   ,      &  !: in data domain indices
79      ! Domain characteristics
80      jperio  =    6  ,      &  !: lateral cond. type (between 0 and 6)
81      jpisl   =   79  ,      &  !: number of islands
82      jpnisl  = 2000            !: maximum number of points per island
83#endif
84
85   !!  Values set to pp_not_used indicates that this parameter is not used in THIS config.
86   !!  Values set to pp_to_be_computed  indicates that variables will be computed in domzgr
87   REAL(wp), PARAMETER ::   &
88      pp_not_used       = 999999._wp , &  !:
89      pp_to_be_computed = 0._wp          !:
90
91   !! Coefficients associated with the horizontal coordinate system (jphgr_msh /= 0 )
92
93   INTEGER, PARAMETER   ::   & !
94      jphgr_msh = 0            !: type of horizontal mesh
95      !                        !  = 0 curvilinear coordinate on the sphere
96      !                        !      read in coordinate.nc file
97      !                        !  = 1 geographical mesh on the sphere
98      !                        !      with regular grid-spacing
99      !                        !  = 2 f-plane with regular grid-spacing
100      !                        !  = 3 beta-plane with regular grid-spacing
101      !                        !  = 4 Mercator grid with T/U point at the equator  with
102      !                        !      isotropic resolution (e1_deg)
103
104      !   ppglam0 , ppgphi0: coordinates of the lower leftmost T point of the grid.
105      !   The mercator grid starts only approximately at gphi0 because
106      !   of the constraint that the equator be a T point.
107   REAL(wp) , PARAMETER ::      &  !
108      ppglam0  = pp_not_used,   &  !: longitude of first raw and column T-point (jphgr_msh = 1)
109      ppgphi0  = pp_not_used,   &  !: latitude  of first raw and column T-point (jphgr_msh = 1)
110      !                            ! latitude for the Coriolis or Beta parameter (jphgr_msh = 2 or 3)
111      ppe1_deg = pp_not_used,   &  !: zonal      grid-spacing (degrees)
112      ppe2_deg = pp_not_used,   &  !: meridional grid-spacing (degrees)
113      !
114      ppe1_m   = pp_not_used,   &  !: zonal      grid-spacing (meters )
115      ppe2_m   = pp_not_used       !: meridional grid-spacing (meters )
116
117   !!
118   !! Vertical grid parameter for domzgr
119   !! =====================================
120   !!
121   REAL(wp), PARAMETER  ::       &
122      &     ppsur = -4762.96143546300_wp    ,  &  !: ORCA r4, r2 and r05 coefficients
123      &     ppa0  =   255.58049070440_wp    ,  &  !: (default coefficients)
124      &     ppa1  =   245.58132232490_wp    ,  &  !:
125      &     ppkth =    21.43336197938_wp    ,  &  !: (non dimensional): gives the approximate
126      !                                           !: layer number above which  stretching will
127      !                                           !: be maximum. Usually of order jpk/2.
128      &     ppacr =     3.00000000000_wp          !: (non dimensional): stretching factor
129      !                                           !: for the grid. The highest zacr, the smallest
130      !                                           !: the stretching.
131
132   !!
133   !!  If both ppa0 ppa1 and ppsur are specified to 0, then
134   !!  they are computed from ppdzmin, pphmax , ppkth, ppacr in dom_zgr
135   !!
136   REAL(wp), PARAMETER ::        &
137      &     ppdzmin = pp_not_used           ,  &  !: (meters) vertical thickness of the top layer
138      &     pphmax  = pp_not_used                 !: (meters) Maximum depth of the ocean gdepw(jpk)
139   !!---------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.