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/TOP_SRC/TRP/trcnam_trp.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/TOP_SRC/TRP/trcnam_trp.F90

    r3875 r3901  
    2222   PUBLIC   trc_nam_trp    ! routine called by step module 
    2323  
    24    !                                                 !!: ** Advection (nam_trcadv) ** 
    25    LOGICAL , PUBLIC ::   ln_trcadv_cen2   = .FALSE.   ! 2nd order centered scheme flag 
    26    LOGICAL , PUBLIC ::   ln_trcadv_tvd    = .TRUE.    ! TVD scheme flag 
    27    LOGICAL , PUBLIC ::   ln_trcadv_muscl  = .FALSE.   ! MUSCL scheme flag 
    28    LOGICAL , PUBLIC ::   ln_trcadv_muscl2 = .FALSE.   ! MUSCL2 scheme flag 
    29    LOGICAL , PUBLIC ::   ln_trcadv_ubs    = .FALSE.   ! UBS scheme flag 
    30    LOGICAL , PUBLIC ::   ln_trcadv_qck    = .FALSE.   ! QUICKEST scheme flag 
    31    LOGICAL , PUBLIC ::   ln_trcadv_msc_ups= .FALSE.   ! use upstream scheme within muscl 
    32  
    33  
    34    !                                                 !!: ** lateral mixing namelist (nam_trcldf) ** 
    35    LOGICAL , PUBLIC ::   ln_trcldf_diff  = .FALSE.    !: flag of perform or not the lateral diff. 
    36    LOGICAL , PUBLIC ::   ln_trcldf_lap   = .TRUE.     !: laplacian operator 
    37    LOGICAL , PUBLIC ::   ln_trcldf_bilap = .FALSE.    !: bilaplacian operator 
    38    LOGICAL , PUBLIC ::   ln_trcldf_level = .FALSE.    !: iso-level direction 
    39    LOGICAL , PUBLIC ::   ln_trcldf_hor   = .FALSE.    !: horizontal (geopotential) direction 
    40    LOGICAL , PUBLIC ::   ln_trcldf_iso   = .TRUE.     !: iso-neutral direction 
    41    REAL(wp), PUBLIC ::   rn_ahtrc_0                   !: diffusivity coefficient for passive tracer (m2/s) 
    42    REAL(wp), PUBLIC ::   rn_ahtrb_0                   !: background diffusivity coefficient for passive tracer (m2/s) 
    43  
    44    !                                                 !!: ** Treatment of Negative concentrations ( nam_trcrad ) 
    45    LOGICAL , PUBLIC ::   ln_trcrad       = .TRUE.     !: flag to artificially correct negative concentrations 
    46  
    47    !                                                 !!: ** Vertical diffusion (nam_trczdf) ** 
    48    LOGICAL , PUBLIC ::   ln_trczdf_exp = .FALSE.      !: explicit vertical diffusion scheme flag 
    49    INTEGER , PUBLIC ::   nn_trczdf_exp = 3             !: number of sub-time step (explicit time stepping) 
     24   !                                        !!: ** Advection (namtrc_adv) ** 
     25   LOGICAL , PUBLIC ::   ln_trcadv_cen2      ! 2nd order centered scheme flag 
     26   LOGICAL , PUBLIC ::   ln_trcadv_tvd       ! TVD scheme flag 
     27   LOGICAL , PUBLIC ::   ln_trcadv_muscl     ! MUSCL scheme flag 
     28   LOGICAL , PUBLIC ::   ln_trcadv_muscl2    ! MUSCL2 scheme flag 
     29   LOGICAL , PUBLIC ::   ln_trcadv_ubs       ! UBS scheme flag 
     30   LOGICAL , PUBLIC ::   ln_trcadv_qck       ! QUICKEST scheme flag 
     31   LOGICAL , PUBLIC ::   ln_trcadv_msc_ups   ! use upstream scheme within muscl 
     32 
     33 
     34   !                                        !!: ** lateral mixing namelist (nam_trcldf) ** 
     35   LOGICAL , PUBLIC ::   ln_trcldf_diff      !: flag of perform or not the lateral diff. 
     36   LOGICAL , PUBLIC ::   ln_trcldf_lap       !: laplacian operator 
     37   LOGICAL , PUBLIC ::   ln_trcldf_bilap     !: bilaplacian operator 
     38   LOGICAL , PUBLIC ::   ln_trcldf_level     !: iso-level direction 
     39   LOGICAL , PUBLIC ::   ln_trcldf_hor       !: horizontal (geopotential) direction 
     40   LOGICAL , PUBLIC ::   ln_trcldf_iso       !: iso-neutral direction 
     41   REAL(wp), PUBLIC ::   rn_ahtrc_0          !: diffusivity coefficient for passive tracer (m2/s) 
     42   REAL(wp), PUBLIC ::   rn_ahtrb_0          !: background diffusivity coefficient for passive tracer (m2/s) 
     43 
     44   !                                        !!: ** Treatment of Negative concentrations ( nam_trcrad ) 
     45   LOGICAL , PUBLIC ::   ln_trcrad           !: flag to artificially correct negative concentrations 
     46 
     47   !                                        !!: ** Vertical diffusion (nam_trczdf) ** 
     48   LOGICAL , PUBLIC ::   ln_trczdf_exp       !: explicit vertical diffusion scheme flag 
     49   INTEGER , PUBLIC ::   nn_trczdf_exp       !: number of sub-time step (explicit time stepping) 
    5050 
    5151 
Note: See TracChangeset for help on using the changeset viewer.