Changeset 2973
- Timestamp:
- 2011-10-21T16:09:52+02:00 (13 years ago)
- Location:
- branches/2011/dev_r2855_CMCC4_con
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_r2855_CMCC4_con/DOC/TexFiles/Chapters/Chap_DYN.tex
r2541 r2973 189 189 the relative vorticity term and horizontal kinetic energy for the planetary vorticity 190 190 term (MIX scheme) ; or conserving both the potential enstrophy of horizontally non-divergent 191 flow and horizontal kinetic energy (ENE scheme) (see Appendix~\ref{Apdx_C_vor_zad}). 191 flow and horizontal kinetic energy (EEN scheme) (see Appendix~\ref{Apdx_C_vor_zad}). In the 192 case of ENS, ENE or MIX schemes the land sea mask may be slightly modified to ensure the 193 consistency of vorticity term with analytical equations (\textit{ln\_dynvor\_con}=true). 192 194 The vorticity terms are all computed in dedicated routines that can be found in 193 195 the \mdl{dynvor} module. -
branches/2011/dev_r2855_CMCC4_con/DOC/TexFiles/Namelist/namdyn_vor
r2540 r2973 6 6 ln_dynvor_mix = .false. ! mixed scheme 7 7 ln_dynvor_een = .true. ! energy & enstrophy scheme 8 ln_dynvor_con = .false. ! consistency of BC with analytical eqs. 8 9 / -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/CONFIG/GYRE/EXP00/namelist
r2715 r2973 521 521 ln_dynvor_mix = .false. ! mixed scheme 522 522 ln_dynvor_een = .false. ! energy & enstrophy scheme 523 ln_dynvor_con = .false. ! consistency of BC with analytical eqs. 523 524 / 524 525 !----------------------------------------------------------------------- -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/CONFIG/ORCA2_LIM/EXP00/namelist
r2715 r2973 521 521 ln_dynvor_mix = .false. ! mixed scheme 522 522 ln_dynvor_een = .true. ! energy & enstrophy scheme 523 ln_dynvor_con = .false. ! consistency of BC with analytical eqs. 523 524 / 524 525 !----------------------------------------------------------------------- -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/CONFIG/ORCA2_OFF_PISCES/EXP00/namelist
r2715 r2973 522 522 ln_dynvor_mix = .false. ! mixed scheme 523 523 ln_dynvor_een = .true. ! energy & enstrophy scheme 524 ln_dynvor_con = .false. ! consistency of BC with analytical eqs. 524 525 / 525 526 !----------------------------------------------------------------------- -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/CONFIG/POMME/EXP00/namelist
r2650 r2973 521 521 ln_dynvor_mix = .false. ! mixed scheme 522 522 ln_dynvor_een = .true. ! energy & enstrophy scheme 523 ln_dynvor_con = .false. ! consistency of BC with analytical eqs. 523 524 / 524 525 !----------------------------------------------------------------------- -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/NEMO/OPA_SRC/DOM/dommsk.F90
r2715 r2973 26 26 USE dom_oce ! ocean space and time domain 27 27 USE obc_oce ! ocean open boundary conditions 28 USE dynvor ! vorticity term 28 29 USE in_out_manager ! I/O manager 29 30 USE lbclnk ! ocean lateral boundary conditions (or mpp link) … … 390 391 CALL lbc_lnk( fmask, 'F', 1._wp ) ! Lateral boundary conditions on fmask 391 392 393 394 ! If energy, enstrophy or mixed advection of momentum in vector form change the value for masks 395 ! at angles with three ocean points and one land point 396 IF( ln_dynvor_con .OR. ln_dynvor_ene .OR. ln_dynvor_ens .OR. ln_dynvor_mix) THEN 397 DO jj = 2, jpjm1 398 DO ji = 2, jpim1 399 IF( tmask(ji,jj,jk)+tmask(ji+1,jj,jk)+tmask(ji,jj+1,jk)+tmask(ji+1,jj+1,jk) == 3._wp ) THEN 400 fmask(ji,jj,jk) = 1._wp 401 ENDIF 402 END DO 403 END DO 404 ENDIF 405 392 406 393 407 IF( nprint == 1 .AND. lwp ) THEN ! Control print -
branches/2011/dev_r2855_CMCC4_con/NEMOGCM/NEMO/OPA_SRC/DYN/dynvor.F90
r2715 r2973 23 23 !! vor_mix : mixed enstrophy/energy conserving (ln_dynvor_mix=T) 24 24 !! vor_een : energy and enstrophy conserving (ln_dynvor_een=T) 25 !! vor_con : BC consistent with analytical eqs.(ln_dynvor_con=T) 25 26 !! dyn_vor_init : set and control of the different vorticity option 26 27 !!---------------------------------------------------------------------- … … 46 47 LOGICAL, PUBLIC :: ln_dynvor_mix = .FALSE. !: mixed scheme 47 48 LOGICAL, PUBLIC :: ln_dynvor_een = .FALSE. !: energy and enstrophy conserving scheme 49 LOGICAL, PUBLIC :: ln_dynvor_con = .FALSE. !: consistency with flux form 48 50 49 51 INTEGER :: nvor = 0 ! type of vorticity trend used … … 685 687 INTEGER :: ioptio ! local integer 686 688 !! 687 NAMELIST/namdyn_vor/ ln_dynvor_ens, ln_dynvor_ene, ln_dynvor_mix, ln_dynvor_een 689 NAMELIST/namdyn_vor/ ln_dynvor_ens, ln_dynvor_ene, ln_dynvor_mix, ln_dynvor_een, ln_dynvor_con 688 690 !!---------------------------------------------------------------------- 689 691 … … 700 702 WRITE(numout,*) ' mixed enstrophy/energy conserving scheme ln_dynvor_mix = ', ln_dynvor_mix 701 703 WRITE(numout,*) ' enstrophy and energy conserving scheme ln_dynvor_een = ', ln_dynvor_een 704 WRITE(numout,*) ' consistency with flux form ln_dynvor_con = ', ln_dynvor_con 702 705 ENDIF 703 706
Note: See TracChangeset
for help on using the changeset viewer.