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/LDF – 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/LDF
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/LDF/ldfdyn_oce.F90

    r3634 r3901  
    1313   PUBLIC 
    1414 
    15    !                                                  !!* Namelist namdyn_ldf : lateral mixing * 
    16    LOGICAL , PUBLIC ::   ln_dynldf_lap   = .TRUE.      !: laplacian operator 
    17    LOGICAL , PUBLIC ::   ln_dynldf_bilap = .FALSE.     !: bilaplacian operator 
    18    LOGICAL , PUBLIC ::   ln_dynldf_level = .FALSE.     !: iso-level direction 
    19    LOGICAL , PUBLIC ::   ln_dynldf_hor   = .TRUE.      !: horizontal (geopotential) direction 
    20    LOGICAL , PUBLIC ::   ln_dynldf_iso   = .FALSE.     !: iso-neutral direction 
    21    REAL(wp), PUBLIC ::   rn_ahm_0_lap    = 40000._wp   !: lateral laplacian eddy viscosity (m2/s) 
    22    REAL(wp), PUBLIC ::   rn_ahmb_0       =     0._wp   !: lateral laplacian background eddy viscosity (m2/s) 
    23    REAL(wp), PUBLIC ::   rn_ahm_0_blp    =     0._wp   !: lateral bilaplacian eddy viscosity (m4/s) 
     15   !                                       !!* Namelist namdyn_ldf : lateral mixing * 
     16   LOGICAL , PUBLIC ::   ln_dynldf_lap      !: laplacian operator 
     17   LOGICAL , PUBLIC ::   ln_dynldf_bilap    !: bilaplacian operator 
     18   LOGICAL , PUBLIC ::   ln_dynldf_level    !: iso-level direction 
     19   LOGICAL , PUBLIC ::   ln_dynldf_hor      !: horizontal (geopotential) direction 
     20   LOGICAL , PUBLIC ::   ln_dynldf_iso      !: iso-neutral direction 
     21   REAL(wp), PUBLIC ::   rn_ahm_0_lap       !: lateral laplacian eddy viscosity (m2/s) 
     22   REAL(wp), PUBLIC ::   rn_ahmb_0          !: lateral laplacian background eddy viscosity (m2/s) 
     23   REAL(wp), PUBLIC ::   rn_ahm_0_blp       !: lateral bilaplacian eddy viscosity (m4/s) 
    2424   REAL(wp), PUBLIC ::   ahm0, ahmb0, ahm0_blp         !: OLD namelist names 
    25    REAL(wp), PUBLIC ::   rn_cmsmag_1     =     3._wp   !: constant in laplacian Smagorinsky viscosity 
    26    REAL(wp), PUBLIC ::   rn_cmsmag_2     =     3._wp   !: constant in bilaplacian Smagorinsky viscosity 
    27    REAL(wp), PUBLIC ::   rn_cmsh         =     1._wp   !: 1 or 0 , if 0 -use only shear for Smagorinsky viscosity 
    28    REAL(wp), PUBLIC ::   rn_ahm_m_blp    = -1.e12_wp   !: upper limit for bilap  abs(ahm) < min( dx^4/128rdt, rn_ahm_m_blp) 
    29    REAL(wp), PUBLIC ::   rn_ahm_m_lap    =  40000_wp   !: upper limit for lap  ahm < min(dx^2/16rdt, rn_ahm_m_lap) 
     25   REAL(wp), PUBLIC ::   rn_cmsmag_1        !: constant in laplacian Smagorinsky viscosity 
     26   REAL(wp), PUBLIC ::   rn_cmsmag_2        !: constant in bilaplacian Smagorinsky viscosity 
     27   REAL(wp), PUBLIC ::   rn_cmsh            !: 1 or 0 , if 0 -use only shear for Smagorinsky viscosity 
     28   REAL(wp), PUBLIC ::   rn_ahm_m_blp       !: upper limit for bilap  abs(ahm) < min( dx^4/128rdt, rn_ahm_m_blp) 
     29   REAL(wp), PUBLIC ::   rn_ahm_m_lap       !: upper limit for lap  ahm < min(dx^2/16rdt, rn_ahm_m_lap) 
     30 
    3031   INTEGER , PUBLIC ::   nkahm_smag      =  0          !:  
    3132 
  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/LDF/ldftra_oce.F90

    r3634 r3901  
    1818   !! Lateral eddy diffusivity coefficients (tracers) 
    1919   !!---------------------------------------------------------------------- 
    20    !                                                !!* Namelist namtra_ldf : lateral mixing * 
    21    LOGICAL , PUBLIC ::   ln_traldf_lap   = .TRUE.    !: laplacian operator 
    22    LOGICAL , PUBLIC ::   ln_traldf_bilap = .FALSE.  !: bilaplacian operator 
    23    LOGICAL , PUBLIC ::   ln_traldf_level = .FALSE.  !: iso-level direction 
    24    LOGICAL , PUBLIC ::   ln_traldf_hor   = .FALSE.  !: horizontal (geopotential) direction 
    25    LOGICAL , PUBLIC ::   ln_traldf_iso   = .TRUE.    !: iso-neutral direction 
    26    LOGICAL , PUBLIC ::   ln_traldf_grif  = .FALSE.  !: griffies skew flux 
    27    LOGICAL , PUBLIC ::   ln_traldf_gdia  = .FALSE.  !: griffies skew flux streamfunction diagnostics 
    28    REAL(wp), PUBLIC ::   rn_aht_0        = 2000._wp !: lateral eddy diffusivity (m2/s) 
    29    REAL(wp), PUBLIC ::   rn_ahtb_0       =    0._wp !: lateral background eddy diffusivity (m2/s) 
    30    REAL(wp), PUBLIC ::   rn_aeiv_0       = 2000._wp !: eddy induced velocity coefficient (m2/s) 
    31    REAL(wp), PUBLIC ::   rn_slpmax       = 0.01_wp  !: slope limit 
    32    REAL(wp), PUBLIC ::   rn_chsmag       = 1._wp    !:  multiplicative factor in Smagorinsky diffusivity 
    33    REAL(wp), PUBLIC ::   rn_smsh         = 1._wp    !:  Smagorinsky diffusivity: = 0 - use only sheer 
    34    REAL(wp), PUBLIC ::   rn_aht_m        = 2000._wp !:  upper limit or stability criteria for lateral eddy diffusivity (m2/s) 
     20   !                                     !!* Namelist namtra_ldf : lateral mixing * 
     21   LOGICAL , PUBLIC ::   ln_traldf_lap    !: laplacian operator 
     22   LOGICAL , PUBLIC ::   ln_traldf_bilap !: bilaplacian operator 
     23   LOGICAL , PUBLIC ::   ln_traldf_level !: iso-level direction 
     24   LOGICAL , PUBLIC ::   ln_traldf_hor    !: horizontal (geopotential) direction 
     25   LOGICAL , PUBLIC ::   ln_traldf_iso    !: iso-neutral direction 
     26   LOGICAL , PUBLIC ::   ln_traldf_grif  !: griffies skew flux 
     27   LOGICAL , PUBLIC ::   ln_traldf_gdia  !: griffies skew flux streamfunction diagnostics 
     28   REAL(wp), PUBLIC ::   rn_aht_0        !: lateral eddy diffusivity (m2/s) 
     29   REAL(wp), PUBLIC ::   rn_ahtb_0        !: lateral background eddy diffusivity (m2/s) 
     30   REAL(wp), PUBLIC ::   rn_aeiv_0        !: eddy induced velocity coefficient (m2/s) 
     31   REAL(wp), PUBLIC ::   rn_slpmax        !: slope limit 
     32   REAL(wp), PUBLIC ::   rn_chsmag        !:  multiplicative factor in Smagorinsky diffusivity 
     33   REAL(wp), PUBLIC ::   rn_smsh          !:  Smagorinsky diffusivity: = 0 - use only sheer 
     34   REAL(wp), PUBLIC ::   rn_aht_m        !:  upper limit or stability criteria for lateral eddy diffusivity (m2/s) 
    3535 
    3636   REAL(wp), PUBLIC ::   aht0, ahtb0, aeiv0         !!: OLD namelist names 
    3737 
    38    LOGICAL , PUBLIC ::   ln_triad_iso    = .FALSE.   !: calculate triads twice 
    39    LOGICAL , PUBLIC ::   ln_botmix_grif  = .FALSE.   !: mixing on bottom 
     38   LOGICAL , PUBLIC ::   ln_triad_iso    !: calculate triads twice 
     39   LOGICAL , PUBLIC ::   ln_botmix_grif  !: mixing on bottom 
    4040   LOGICAL , PUBLIC ::   l_grad_zps      = .FALSE.   !: special treatment for Horz Tgradients w partial steps  
    4141 
Note: See TracChangeset for help on using the changeset viewer.