source: trunk/NEMOGCM/NEMO/OPA_SRC/OBC/obc_par_BB12.h90 @ 22

Last change on this file since 22 was 17, checked in by rblod, 12 years ago

Add BB12 configuration
  • Property svn:keywords set to Id
File size: 3.7 KB
Line 
1   !!----------------------------------------------------------------------
2   !!                  ***  obc_par_BB12.h90  ***
3   !!----------------------------------------------------------------------
4   !! open boundary parameter : BENGAL configuration
5   !!---------------------------------------------------------------------
6     INTEGER, PARAMETER ::     &  !: time dimension of the BCS fields on input
7      jptobc  =       2
8
9   !! * EAST open boundary
10   LOGICAL, PARAMETER ::     &  !:
11      lp_obc_east = .TRUE.      !: IND025 to active or not the East open boundary
12
13     INTEGER   &
14#if !defined key_agrif
15     , PARAMETER   &
16#endif
17    ::     &
18      ! * default values *
19      jpieob  = jpiglo-2,    &  !: i-localization of the East open boundary (must be ocean U-point)
20      jpjed   =       2,   &  !: see matlab script modif_bathy.m
21      jpjef   =      33,    &  !: j-ending   indice of the East open boundary (must be land T-point)
22      jpjedp1 =  jpjed+1,    &  !: first ocean point         "                 "
23      jpjefm1 =  jpjef-1        !: last  ocean point         "                 "
24
25   !! * WEST open boundary
26   LOGICAL, PARAMETER ::     &  !:
27      lp_obc_west = .TRUE.     !: to active or not the West open boundary
28     INTEGER   &
29#if !defined key_agrif
30     , PARAMETER   &
31#endif
32    ::     &
33      jpiwob  =        2,    &  !: i-localization of the West open boundary (must be ocean U-point)
34      jpjwd   =       36,    &  !: j-starting indice of the West open boundary (must be land T-point)
35      jpjwf   =       72,    &  !: j-ending   indice of the West open boundary (must be land T-point)
36      jpjwdp1 =  jpjwd+1,    &  !: first ocean point         "                 "
37      jpjwfm1 =  jpjwf-1        !: last  ocean point         "                 "
38
39   !! * NORTH open boundary
40   LOGICAL, PARAMETER ::     &  !:
41      lp_obc_north = .FALSE.     !: IND025 to active or not the North open boundary
42     INTEGER   &
43#if !defined key_agrif
44     , PARAMETER   &
45#endif
46    ::     &
47      ! * default values *
48      jpjnob = jpjglo-2,    &  !: j-localization of the North open boundary (must be ocean V-point)
49      jpind  =        2,    &  !: i-starting indice of the North open boundary (must be land T-point)
50      jpinf  = jpiglo-1,    &  !: i-ending   indice of the North open boundary (must be land T-point)
51      jpindp1 =  jpind+1,    &  !: first ocean point         "                 "
52      jpinfm1 =  jpinf-1        !: last  ocean point         "                 "
53
54   !! * SOUTH open boundary
55   LOGICAL, PARAMETER ::     &  !:
56      lp_obc_south = .TRUE.     !: INDICE to active or not the South open boundary
57     INTEGER   &
58#if !defined key_agrif
59     , PARAMETER   &
60#endif
61    ::     &
62      jpjsob  =       37,    &  !: j-localization of the South open boundary (must be ocean V-point)
63      jpisd   =        1,    &  !: i-starting indice of the South open boundary (must be land T-point)
64      jpisf   =      217,    &  !: i-ending   indice of the South open boundary (must be land T-point)
65      jpisdp1 =  jpisd+1,    &  !: first ocean point         "                 "
66      jpisfm1 =  jpisf-1        !: last  ocean point         "                 "
67   
68   !! * CHOSE WHERE YOU WANT TO LOCATE THE BAROTROPIC CORRECTION VELOCITY
69   !chd IND025
70   LOGICAL, PARAMETER ::     &  !:
71        lp_obc_east_barotp_corr  = .TRUE.,   & !:
72        lp_obc_west_barotp_corr  = .TRUE.,   & !:
73        lp_obc_north_barotp_corr = .FALSE.,   & !:
74        lp_obc_south_barotp_corr = .TRUE.       !:
75
76   INTEGER, PARAMETER ::     &  !:
77      jpnic = 2700              !: maximum number of isolated coastlines points
78   !!---------------------------------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.