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 2182 for branches/dev_r1821_mixed_ldfdyn – NEMO

Ignore:
Timestamp:
2010-10-07T17:01:49+02:00 (14 years ago)
Author:
edblockley
Message:

3rd commit for mixed_ldfdyn to include the remainder of the namelist changes and some other modifications

Location:
branches/dev_r1821_mixed_ldfdyn
Files:
9 edited

Legend:

Unmodified
Added
Removed

  • branches/dev_r1821_mixed_ldfdyn/CONFIG/GYRE/EXP00/namelist

    r1741 r2182  
    478478   ln_dynldf_iso    =  .false.  !  iso-neutral                          (require "key_ldfslp") 
    479479                           !  Coefficient 
    480    rn_ahm_0    = 100000.        !  horizontal eddy viscosity   [m2/s] 
    481    rn_ahmb_0   =     0.         !  background eddy viscosity for ldf_iso [m2/s] 
     480   rn_ahm_0_lap     = 100000.   !  horizontal laplacian eddy viscosity   [m2/s] 
     481   rn_ahmb_0        =     0.    !  background eddy viscosity for ldf_iso [m2/s] 
     482   rn_ahm_0_blp     =     0.    !  horizontal bilaplacian eddy viscosity [m4/s] 
    482483/ 
    483484!!====================================================================== 

  • branches/dev_r1821_mixed_ldfdyn/CONFIG/GYRE_LOBSTER/EXP00/namelist

    r1741 r2182  
    478478   ln_dynldf_iso    =  .false.  !  iso-neutral                          (require "key_ldfslp") 
    479479                           !  Coefficient 
    480    rn_ahm_0    = 100000.        !  horizontal eddy viscosity   [m2/s] 
    481    rn_ahmb_0   =     0.         !  background eddy viscosity for ldf_iso [m2/s] 
     480   rn_ahm_0         = 100000.   !  horizontal laplacian eddy viscosity   [m2/s] 
     481   rn_ahmb_0        =     0.    !  background eddy viscosity for ldf_iso [m2/s] 
     482   rn_ahm_0_blp     =     0.    !  horizontal bilaplacian eddy viscosity [m4/s] 
    482483/ 
    483484!!====================================================================== 

  • branches/dev_r1821_mixed_ldfdyn/CONFIG/ORCA2_LIM/EXP00/namelist

    r1840 r2182  
    505505   ln_dynldf_iso    =  .false.  !  iso-neutral                          (require "key_ldfslp") 
    506506                           !  Coefficient 
    507    rn_ahm_0         = 40000.    !  horizontal laplacian eddy viscosity   [m2/s] 
     507   rn_ahm_0_lap     = 40000.    !  horizontal laplacian eddy viscosity   [m2/s] 
    508508   rn_ahmb_0        =     0.    !  background eddy viscosity for ldf_iso [m2/s] 
    509509   rn_ahm_0_blp     =     0.    !  horizontal bilaplacian eddy viscosity [m4/s]  

  • branches/dev_r1821_mixed_ldfdyn/CONFIG/ORCA2_LIM_PISCES/EXP00/namelist

    r1759 r2182  
    505505   ln_dynldf_iso    =  .false.  !  iso-neutral                          (require "key_ldfslp") 
    506506                           !  Coefficient 
    507    rn_ahm_0    = 40000.         !  horizontal eddy viscosity   [m2/s] 
    508    rn_ahmb_0   =     0.         !  background eddy viscosity for ldf_iso [m2/s] 
     507   rn_ahm_0_lap     = 40000.    !  horizontal laplacian eddy viscosity   [m2/s] 
     508   rn_ahmb_0        =     0.    !  background eddy viscosity for ldf_iso [m2/s] 
     509   rn_ahm_0_blp     =     0.    !  horizontal bilaplacian eddy viscosity [m4/s] 
    509510/ 
    510511!!====================================================================== 

  • branches/dev_r1821_mixed_ldfdyn/CONFIG/POMME/EXP00/namelist

    r1730 r2182  
    502502   ln_dynldf_iso    =  .false.  !  iso-neutral                          (require "key_ldfslp") 
    503503                           !  Coefficient 
    504    rn_ahm_0    = -1.5e11        !  horizontal eddy viscosity   [m2/s] 
    505    rn_ahmb_0   =    500.        !  background eddy viscosity for ldf_iso [m2/s] 
     504   rn_ahm_0_lap     =     0.    !  horizontal laplacian eddy viscosity   [m2/s] 
     505   rn_ahmb_0        =    500.   !  background eddy viscosity for ldf_iso [m2/s] 
     506   rn_ahm_0_blp     = -1.5e11   !  horizontal bilaplacian eddy viscosity [m4/s] 
    506507/ 
    507508!!====================================================================== 

  • branches/dev_r1821_mixed_ldfdyn/DOC/TexFiles/Namelist/nam_dynldf

    r1840 r2182  
    1010   ln_dynldf_iso    =  .false.  !     iso-neutral                      (require "key_ldfslp") 
    1111                                !  Coefficient 
    12    rn_ahm_0         = 40000.    !     horizontal laplacian eddy viscosity   [m2/s] 
     12   rn_ahm_0_lap     = 40000.    !     horizontal laplacian eddy viscosity   [m2/s] 
    1313   rn_ahmb_0        =     0.    !     background eddy viscosity for ldf_iso [m2/s] 
    1414   rn_ahm_0_blp     =     0.    !     horizontal bilaplacian eddy viscosity [m4/s]  

  • branches/dev_r1821_mixed_ldfdyn/NEMO/OPA_SRC/DYN/dynldf.F90

    r1839 r2182  
    3232   PUBLIC   dyn_ldf   ! called by step module  
    3333 
    34    INTEGER ::   nldf = 0   ! type of lateral diffusion used defined from ln_dynldf_... namlist logicals) 
     34   INTEGER ::   nldf = -2   ! type of lateral diffusion used defined from ln_dynldf_... namlist logicals) 
    3535 
    3636   !! * Substitutions 

  • branches/dev_r1821_mixed_ldfdyn/NEMO/OPA_SRC/LDF/ldfdyn.F90

    r1839 r2182  
    6767      NAMELIST/namdyn_ldf/ ln_dynldf_lap  , ln_dynldf_bilap,                  & 
    6868         &                 ln_dynldf_level, ln_dynldf_hor  , ln_dynldf_iso,   & 
    69          &                 rn_ahm_0       , rn_ahmb_0      , rn_ahm_0_blp 
     69         &                 rn_ahm_0_lap   , rn_ahmb_0      , rn_ahm_0_blp 
    7070      !!---------------------------------------------------------------------- 
    7171 
    … …  
    8383         WRITE(numout,*) '      horizontal (geopotential)               ln_dynldf_hor   = ', ln_dynldf_hor 
    8484         WRITE(numout,*) '      iso-neutral                             ln_dynldf_iso   = ', ln_dynldf_iso 
    85          WRITE(numout,*) '      horizontal laplacian eddy viscosity     rn_ahm_0        = ', rn_ahm_0 
     85         WRITE(numout,*) '      horizontal laplacian eddy viscosity     rn_ahm_0_lap    = ', rn_ahm_0_lap 
    8686         WRITE(numout,*) '      background viscosity                    rn_ahmb_0       = ', rn_ahmb_0 
    87          WRITE(numout,*) '      horizontal bilaplacian eddy viscosity   rn_ahm_0        = ', rn_ahm_0 
    88  
    89       ENDIF 
    90  
    91       ahm0     = rn_ahm_0                  ! OLD namelist variables defined from DOCTOR namelist variables 
     87         WRITE(numout,*) '      horizontal bilaplacian eddy viscosity   rn_ahm_0_blp    = ', rn_ahm_0_blp 
     88 
     89      ENDIF 
     90 
     91      ahm0     = rn_ahm_0_lap              ! OLD namelist variables defined from DOCTOR namelist variables 
    9292      ahmb0    = rn_ahmb_0 
    9393      ahm0_blp = rn_ahm_0_blp 
    … …  
    120120      IF( ln_dynldf_bilap ) THEN 
    121121         IF(lwp) WRITE(numout,*) '   biharmonic momentum diffusion' 
    122          IF( ahm0_blp == 0.0 ) ahm0_blp = ahm0       ! Old namelist method: bilap specified with ahm0 
    123122         IF( .NOT. ln_dynldf_lap ) ahm0 = ahm0_blp   ! Allow spatially varying coefs, which use ahm0 as input 
    124123         IF( ahm0_blp > 0 .AND. .NOT. lk_esopa )   CALL ctl_stop( 'The horizontal viscosity coef. ahm0 must be negative' ) 

  • branches/dev_r1821_mixed_ldfdyn/NEMO/OPA_SRC/LDF/ldfdyn_oce.F90

    r1839 r2182  
    1717   LOGICAL , PUBLIC ::   ln_dynldf_hor   = .TRUE.      !: horizontal (geopotential) direction 
    1818   LOGICAL , PUBLIC ::   ln_dynldf_iso   = .FALSE.     !: iso-neutral direction 
    19    REAL(wp), PUBLIC ::   rn_ahm_0        = 40000._wp   !: lateral laplacian eddy viscosity (m2/s) 
     19   REAL(wp), PUBLIC ::   rn_ahm_0_lap    = 40000._wp   !: lateral laplacian eddy viscosity (m2/s) 
    2020   REAL(wp), PUBLIC ::   rn_ahmb_0       =     0._wp   !: lateral laplacian background eddy viscosity (m2/s) 
    2121   REAL(wp), PUBLIC ::   rn_ahm_0_blp    =     0._wp   !: lateral bilaplacian eddy viscosity (m4/s) 
    2222 
    23    REAL(wp), PUBLIC ::   ahm0, ahmb0, ahm0_blp       ! OLD namelist names 
     23   REAL(wp), PUBLIC ::   ahm0, ahmb0, ahm0_blp         ! OLD namelist names 
    2424 
    2525#if defined key_dynldf_c3d 
Note: See TracChangeset for help on using the changeset viewer.