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/DYN – NEMO

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

Configuration Setting/Step2, see ticket:#1074

Location:
branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/DYN
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/DYN/dynadv.F90

    r3875 r3901  
    2727   PUBLIC dyn_adv_init  ! routine called by opa module 
    2828  
    29    LOGICAL, PUBLIC ::   ln_dynadv_vec  = .TRUE.    !: vector form flag 
    30    LOGICAL, PUBLIC ::   ln_dynadv_cen2 = .FALSE.  !: flux form - 2nd order centered scheme flag 
    31    LOGICAL, PUBLIC ::   ln_dynadv_ubs  = .FALSE.  !: flux form - 3rd order UBS scheme flag 
     29   LOGICAL, PUBLIC ::   ln_dynadv_vec  !: vector form flag 
     30   LOGICAL, PUBLIC ::   ln_dynadv_cen2 !: flux form - 2nd order centered scheme flag 
     31   LOGICAL, PUBLIC ::   ln_dynadv_ubs  !: flux form - 3rd order UBS scheme flag 
    3232    
    3333   INTEGER ::   nadv   ! choice of the formulation and scheme for the advection 

  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/DYN/dynhpg.F90

    r3875 r3901  
    4646   PUBLIC   dyn_hpg_init   ! routine called by opa module 
    4747 
    48    !                                              !!* Namelist namdyn_hpg : hydrostatic pressure gradient 
    49    LOGICAL , PUBLIC ::   ln_hpg_zco    = .TRUE.    !: z-coordinate - full steps 
    50    LOGICAL , PUBLIC ::   ln_hpg_zps    = .FALSE.   !: z-coordinate - partial steps (interpolation) 
    51    LOGICAL , PUBLIC ::   ln_hpg_sco    = .FALSE.   !: s-coordinate (standard jacobian formulation) 
    52    LOGICAL , PUBLIC ::   ln_hpg_djc    = .FALSE.   !: s-coordinate (Density Jacobian with Cubic polynomial) 
    53    LOGICAL , PUBLIC ::   ln_hpg_prj    = .FALSE.   !: s-coordinate (Pressure Jacobian scheme) 
    54    LOGICAL , PUBLIC ::   ln_dynhpg_imp = .FALSE.   !: semi-implicite hpg flag 
     48   !                                    !!* Namelist namdyn_hpg : hydrostatic pressure gradient 
     49   LOGICAL , PUBLIC ::   ln_hpg_zco      !: z-coordinate - full steps 
     50   LOGICAL , PUBLIC ::   ln_hpg_zps      !: z-coordinate - partial steps (interpolation) 
     51   LOGICAL , PUBLIC ::   ln_hpg_sco      !: s-coordinate (standard jacobian formulation) 
     52   LOGICAL , PUBLIC ::   ln_hpg_djc      !: s-coordinate (Density Jacobian with Cubic polynomial) 
     53   LOGICAL , PUBLIC ::   ln_hpg_prj      !: s-coordinate (Pressure Jacobian scheme) 
     54   LOGICAL , PUBLIC ::   ln_dynhpg_imp   !: semi-implicite hpg flag 
    5555 
    5656   INTEGER , PUBLIC ::   nhpg  =  0   ! = 0 to 7, type of pressure gradient scheme used ! (deduced from ln_hpg_... flags) (PUBLIC for TAM) 

  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/DYN/dynnept.F90

    r3875 r3901  
    4949 
    5050   !! * Namelist namdyn_nept variables 
    51    LOGICAL, PUBLIC  ::  ln_neptsimp        = .FALSE.  ! yes/no simplified neptune 
    52  
    53    LOGICAL          ::  ln_smooth_neptvel  = .FALSE.  ! yes/no smooth zunep, zvnep 
    54    REAL(wp)         ::  rn_tslse           =  1.2e4   ! value of lengthscale L at the equator 
    55    REAL(wp)         ::  rn_tslsp           =  3.0e3   ! value of lengthscale L at the pole 
     51   LOGICAL, PUBLIC  ::  ln_neptsimp          ! yes/no simplified neptune 
     52 
     53   LOGICAL          ::  ln_smooth_neptvel    ! yes/no smooth zunep, zvnep 
     54   REAL(wp)         ::  rn_tslse             ! value of lengthscale L at the equator 
     55   REAL(wp)         ::  rn_tslsp             ! value of lengthscale L at the pole 
    5656!! Specify whether to ramp down the Neptune velocity in shallow 
    5757!! water, and the depth range controlling such ramping down 
    58    LOGICAL          ::  ln_neptramp        = .FALSE.  ! ramp down Neptune velocity in shallow water 
    59    REAL(wp)         ::  rn_htrmin          =  100.0   ! min. depth of transition range 
    60    REAL(wp)         ::  rn_htrmax          =  200.0   ! max. depth of transition range 
     58   LOGICAL          ::  ln_neptramp          ! ramp down Neptune velocity in shallow water 
     59   REAL(wp)         ::  rn_htrmin            ! min. depth of transition range 
     60   REAL(wp)         ::  rn_htrmax            ! max. depth of transition range 
    6161 
    6262   !! * Module variables 

  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/DYN/dynvor.F90

    r3875 r3901  
    4545   PUBLIC   dyn_vor_init   ! routine called by opa.F90 
    4646 
    47    !                                             !!* Namelist namdyn_vor: vorticity term 
    48    LOGICAL, PUBLIC ::   ln_dynvor_ene = .FALSE.   !: energy conserving scheme 
    49    LOGICAL, PUBLIC ::   ln_dynvor_ens = .TRUE.    !: enstrophy conserving scheme 
    50    LOGICAL, PUBLIC ::   ln_dynvor_mix = .FALSE.   !: mixed scheme 
    51    LOGICAL, PUBLIC ::   ln_dynvor_een = .FALSE.   !: energy and enstrophy conserving scheme 
     47   !                                   !!* Namelist namdyn_vor: vorticity term 
     48   LOGICAL, PUBLIC ::   ln_dynvor_ene   !: energy conserving scheme 
     49   LOGICAL, PUBLIC ::   ln_dynvor_ens   !: enstrophy conserving scheme 
     50   LOGICAL, PUBLIC ::   ln_dynvor_mix   !: mixed scheme 
     51   LOGICAL, PUBLIC ::   ln_dynvor_een   !: energy and enstrophy conserving scheme 
    5252 
    5353   INTEGER ::   nvor = 0   ! type of vorticity trend used 
Note: See TracChangeset for help on using the changeset viewer.