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.
Changeset 3901 for branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/OBC/obc_oce.F90 – NEMO

Ignore:
Timestamp:
2013-05-03T14:35:21+02:00 (11 years ago)
Author:
clevy
Message:

Configuration Setting/Step2, see ticket:#1074

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/OBC/obc_oce.F90

    r2715 r3901  
    2323   !!---------------------------------------------------------------------- 
    2424   ! 
    25    !                                            !!* Namelist namobc: open boundary condition * 
    26    INTEGER           ::   nn_obcdta   = 0        !:  = 0 use the initial state as obc data 
    27    !                                             !   = 1 read obc data in obcxxx.dta files 
    28    CHARACTER(len=20) ::   cn_obcdta   = 'annual' !: set to annual  if obc datafile hold 1 year of data 
    29    !                                             !  set to monthly if obc datafile hold 1 month of data 
    30    LOGICAL           ::   ln_obc_clim = .true.   !:  obc data files are climatological 
    31    LOGICAL           ::   ln_obc_fla  = .false.  !:  Flather open boundary condition not used 
    32    LOGICAL           ::   ln_vol_cst  = .true.   !:  Conservation of the whole volume 
    33    REAL(wp)          ::   rn_dpein    =  1.      !: damping time scale for inflow at East open boundary 
    34    REAL(wp)          ::   rn_dpwin    =  1.      !:    "                      "   at West open boundary 
    35    REAL(wp)          ::   rn_dpsin    =  1.      !:    "                      "   at South open boundary 
    36    REAL(wp)          ::   rn_dpnin    =  1.      !:    "                      "   at North open boundary 
    37    REAL(wp)          ::   rn_dpeob    = 15.      !: damping time scale for the climatology at East open boundary 
    38    REAL(wp)          ::   rn_dpwob    = 15.      !:    "                           "       at West open boundary 
    39    REAL(wp)          ::   rn_dpsob    = 15.      !:    "                           "       at South open boundary 
    40    REAL(wp)          ::   rn_dpnob    = 15.      !:    "                           "       at North open boundary 
    41    REAL(wp)          ::   rn_volemp   =  1.      !: = 0 the total volume will have the variability of the  
    42    !                                             !      surface Flux E-P else (volemp = 1) the volume will be constant 
    43    !                                             !  = 1 the volume will be constant during all the integration. 
     25   !                                 !!* Namelist namobc: open boundary condition * 
     26   INTEGER           ::   nn_obcdta   !:  = 0 use the initial state as obc data 
     27   !                                  !   = 1 read obc data in obcxxx.dta files 
     28   CHARACTER(len=20) ::   cn_obcdta   !: set to annual  if obc datafile hold 1 year of data 
     29   !                                  !  set to monthly if obc datafile hold 1 month of data 
     30   LOGICAL           ::   ln_obc_clim !:  obc data files are climatological 
     31   LOGICAL           ::   ln_obc_fla  !:  Flather open boundary condition not used 
     32   LOGICAL           ::   ln_vol_cst  !:  Conservation of the whole volume 
     33   REAL(wp)          ::   rn_dpein    !: damping time scale for inflow at East open boundary 
     34   REAL(wp)          ::   rn_dpwin    !:    "                      "   at West open boundary 
     35   REAL(wp)          ::   rn_dpsin    !:    "                      "   at South open boundary 
     36   REAL(wp)          ::   rn_dpnin    !:    "                      "   at North open boundary 
     37   REAL(wp)          ::   rn_dpeob    !: damping time scale for the climatology at East open boundary 
     38   REAL(wp)          ::   rn_dpwob    !:    "                           "       at West open boundary 
     39   REAL(wp)          ::   rn_dpsob    !:    "                           "       at South open boundary 
     40   REAL(wp)          ::   rn_dpnob    !:    "                           "       at North open boundary 
     41   REAL(wp)          ::   rn_volemp   !: = 0 the total volume will have the variability of the  
     42   !                                  !      surface Flux E-P else (volemp = 1) the volume will be constant 
     43   !                                  !  = 1 the volume will be constant during all the integration. 
    4444 
    4545   !                                  !!! OLD non-DOCTOR name of namelist variables 
Note: See TracChangeset for help on using the changeset viewer.