source: vendor/nemo/v3.4_r_3220_dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/OBC/obc_par_EEL_R5.h90 @ 1

Last change on this file since 1 was 1, checked in by cholod, 12 years ago

importing initial nemo vendor drop (v3.4_r_3220)
File size: 3.7 KB
Line 
1   !!----------------------------------------------------------------------
2   !!                  ***  obc_par_EEL_R5.h90  ***
3   !!----------------------------------------------------------------------
4   !! open boundary parameter : EEL5 configuration
5   !!---------------------------------------------------------------------
6   !!----------------------------------------------------------------------
7   !! NEMO/OPA 3.3 , NEMO Consortium (2010)
8   !! $Id: obc_par_EEL_R5.h90 2528 2010-12-27 17:33:53Z rblod $
9   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
10   !!----------------------------------------------------------------------
11   INTEGER, PARAMETER ::     &  !: time dimension for the BCS fields on input
12      jptobc  =       2
13
14   !! * EAST open boundary
15   LOGICAL, PARAMETER ::     &  !:
16      lp_obc_east = .TRUE.      !: to active or not the East open boundary
17
18     INTEGER   &
19#if !defined key_agrif
20     , PARAMETER   &
21#endif
22    ::     &
23      jpieob  = jpiglo-2,    &  !: i-localization of the East open boundary (must be ocean U-point)
24      jpjed   =        2,    &  !: j-starting indice of the East open boundary (must be land T-point)
25      jpjef   = jpjglo-1,    &  !: j-ending   indice of the East open boundary (must be land T-point)
26      jpjedp1 =  jpjed+1,    &  !: first ocean point         "                 "
27      jpjefm1 =  jpjef-1        !: last  ocean point         "                 "
28
29   !! * WEST open boundary
30   LOGICAL, PARAMETER ::     &  !:
31      lp_obc_west = .TRUE.      !: to active or not the West open boundary
32
33     INTEGER   &
34#if !defined key_agrif
35     , PARAMETER   &
36#endif
37    ::     &
38      jpiwob  =        2,    &  !: i-localization of the West open boundary (must be ocean U-point)
39      jpjwd   =        2,    &  !: j-starting indice of the West open boundary (must be land T-point)
40      jpjwf   = jpjglo-1,    &  !: j-ending   indice of the West open boundary (must be land T-point)
41      jpjwdp1 =  jpjwd+1,    &  !: first ocean point         "                 "
42      jpjwfm1 =  jpjwf-1        !: last  ocean point         "                 "
43
44   !! * NORTH open boundary
45   LOGICAL, PARAMETER ::     &  !:
46      lp_obc_north = .FALSE.    !: to active or not the North open boundary
47
48     INTEGER   &
49#if !defined key_agrif
50     , PARAMETER   &
51#endif
52    ::     &
53      jpjnob  = jpjglo-2,    &  !: j-localization of the North open boundary (must be ocean V-point)
54      jpind   =        2,    &  !: i-starting indice of the North open boundary (must be land T-point)
55      jpinf   = jpiglo-1,    &  !: i-ending   indice of the North open boundary (must be land T-point)
56      jpindp1 =  jpind+1,    &  !: first ocean point         "                 "
57      jpinfm1 =  jpinf-1        !: last  ocean point         "                 "
58
59   !! * SOUTH open boundary
60   LOGICAL, PARAMETER ::     &  !:
61      lp_obc_south = .FALSE.    !: to active or not the South open boundary
62
63     INTEGER   &
64#if !defined key_agrif
65     , PARAMETER   &
66#endif
67    ::     &
68      jpjsob  =        2,    &  !: j-localization of the South open boundary (must be ocean V-point)
69      jpisd   =        2,    &  !: i-starting indice of the South open boundary (must be land T-point)
70      jpisf   = jpiglo-1,    &  !: i-ending   indice of the South open boundary (must be land T-point)
71      jpisdp1 =  jpisd+1,    &  !: first ocean point         "                 "
72      jpisfm1 =  jpisf-1        !: last  ocean point         "                 "
73   
74   INTEGER, PARAMETER ::     &  !:
75      jpnic = 2700              !: maximum number of isolated coastlines points
76   !!---------------------------------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.