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_POMME_R025.h90 in branches/TAM_V3_0/NEMO/OPA_SRC – NEMO

source: branches/TAM_V3_0/NEMO/OPA_SRC/par_POMME_R025.h90 @ 1944

Last change on this file since 1944 was 1944, checked in by rblod, 14 years ago

Add POMME configuration for TAM

File size: 5.3 KB
Line 
1   !!---------------------------------------------------------------------
2   !!                     ***  par_ORCA_R025.h90  *** 
3   !!   Ocean Domain : 0.25 degrees resolution global ocean
4   !!                  (0RCA_R025 configuration)
5   !!---------------------------------------------------------------------
6   !!----------------------------------------------------------------------
7   !!  OPA 9.0 , LOCEAN-IPSL (2005)
8   !! $Header: /home/opalod/NEMOCVSROOT/NEMO/OPA_SRC/par_ORCA_R025.h90,v 1.6 2006/03/10 10:55:34 opalod Exp $
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 = "pomme"          !: POMME025 name of the configuration
17   INTEGER     &
18#if !defined key_agrif
19      , PARAMETER  &
20#endif
21      :: &
22      jp_cfg = 025  ,        &  !: resolution of the configuration (degrees)
23      ! Original data size
24
25      ! ORCA025 global grid size
26      jpiglo_ORCA025 = 1442, &
27      jpjglo_ORCA025 = 1021, &  ! not used currently
28
29      ! POMME "global" domain localisation in the ORCA025 global grid
30      jpi_iw    = 1059,      &
31      jpi_ie    = 1088,      & 
32      jpj_js    = 661,       &
33      jpj_jn    = 700,       &
34
35      jpidta  = ( jpi_ie - jpi_iw + 1 ), &   !: =30 first horizontal dimension > or = to jpi
36      jpjdta  = ( jpj_jn - jpj_js + 1 ), &   !: =40 second                     > or = to jpj
37      jpkdta  = 46 ,         &  !: number of levels           > or = to jpk
38
39      ! total domain matrix size
40      jpiglo  = jpidta,      &  !: first  dimension of global domain --> i
41      jpjglo  = jpjdta,      &  !: second dimension of global domain --> j
42      jpk     = jpkdta,      &  !: number of vertical levels
43      ! starting position of the zoom
44      jpizoom =   1   ,      &  !: left bottom (i,j) indices of the zoom
45      jpjzoom =   1   ,      &  !: in data indices
46      ! Domain characteristics
47      jperio  =    0  ,      &  !: lateral cond. type (between 0 and 6)
48      jpisl   =  150  ,      &  !: number of islands
49      jpnisl  = 3000            !: maximum number of points per island
50
51   !!  Values set to pp_not_used indicates that this parameter is not used in THIS config.
52   !!  Values set to pp_to_be_computed  indicates that variables will be computed in domzgr
53   REAL,PARAMETER      ::  pp_not_used = 999999_wp , &
54      &                    pp_to_be_computed = 0._wp
55   !!
56   !! Coefficients associated with the horizontal coordinate system (jphgr_msh /= 0 )
57   !!
58   INTEGER, PARAMETER ::     & !
59      jphgr_msh = 0            !: type of horizontal mesh
60      !                        !  = 0 curvilinear coordinate on the sphere
61      !                        !      read in coordinate.nc file
62      !                        !  = 1 geographical mesh on the sphere
63      !                        !      with regular grid-spacing
64      !                        !  = 2 f-plane with regular grid-spacing
65      !                        !  = 3 beta-plane with regular grid-spacing
66      !                        !  = 4 Mercator grid with T/U point at the equator  with
67      !                        !      isotropic resolution (e1_deg)
68
69      !   ppglam0 , ppgphi0: coordinates of the lower leftmost T point of the grid.
70      !   The mercator grid starts only approximately at gphi0 because
71      !   of the constraint that the equator be a T point.
72   REAL(wp), PARAMETER ::       &  !
73      ppglam0  = pp_not_used,   &  !: longitude of first raw and column T-point (jphgr_msh = 1)
74      ppgphi0  = pp_not_used,   &  !: latitude  of first raw and column T-point (jphgr_msh = 1)
75      !                            !  latitude for the Coriolis or Beta parameter (jphgr_msh = 2 or 3)
76      ppe1_deg = pp_not_used,   &  !: zonal      grid-spacing (degrees)
77      ppe2_deg = pp_not_used,   &  !: meridional grid-spacing (degrees)
78      !
79      ppe1_m   = pp_not_used,   &  !: zonal      grid-spacing (meters )
80      ppe2_m   = pp_not_used       !: meridional grid-spacing (meters )
81
82   !!  Coefficients associated with the vertical coordinate system
83
84   REAL(wp), PARAMETER  ::       &
85      &     ppsur = pp_to_be_computed ,  &  !: Computed in domzgr, set ppdzmin and pphmax below
86      &     ppa0  = pp_to_be_computed ,  &  !:    "           "
87      &     ppa1  = pp_to_be_computed ,  &  !:    "           "
88      !
89      &     ppkth =  23.563_wp        ,  &  !: (non dimensional): gives the approximate
90      !                                     !: layer number above which  stretching will
91      !                                     !: be maximum. Usually of order jpk/2.
92      &     ppacr =    9.00000000000_wp     !: (non dimensional): stretching factor
93      !                                     !: for the grid. The highest zacr, the smallest
94      !                                     !: the stretching.
95
96   !!
97   !!  If both ppa0 ppa1 and ppsur are specified to 0, then
98   !!  they are computed from ppdzmin, pphmax , ppkth, ppacr in dom_zgr
99   !!
100   REAL(wp), PARAMETER ::        &
101      &     ppdzmin = 6._wp           ,  &  !: (meters) vertical thickness of the top layer
102      &     pphmax  = 5750._wp              !: (meters) Maximum depth of the ocean gdepw(jpk)
103   !!---------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.