comhd.h

CCSM Research Tools: Community Atmosphere Model (CAM)

!----------------------------------------------------------------------- 
! 
! Purpose: horizontal diffusion common block
!
! Author: CCM Core Group
! 
!-----------------------------------------------------------------------
      common /comhd/ cnfac   ,cnlim   ,dif2    ,dif4    , hdfsd2(pnmax)
      common /comhd/ hdfst2(pnmax), hdfsd4(pnmax), hdfst4(pnmax)
      common /comhd/ hdiftq(pnmax,plev), hdifzd(pnmax,plev)
      common /comhd/ kmnhd4  ,kmxhd2  ,kmxhdc  ,nindex(plev),nmaxhd
!
      real(r8) cnfac    ! Courant num factor(multiply by max |V|)
      real(r8) cnlim    ! Maximum allowable courant number
      real(r8) dif2     ! Del^2 diffusion coeff. (also namelist variable)
      real(r8) dif4     ! Del^4 diffusion coeff. (also namelist variable)
      real(r8) hdfsd2   ! Del^2 mult. for each wave (vorticity-divergence)
      real(r8) hdfst2   ! Del^2 multiplier for each wave (t-q)
      real(r8) hdfsd4   ! Del^4 mult. for each wave (vorticity-divergence)
      real(r8) hdfst4   ! Del^4 multiplier for each wave (t-q)
      real(r8) hdiftq   ! Temperature-tracer diffusion factors
      real(r8) hdifzd   ! Vorticity-divergence diffusion factors
!
      integer kmnhd4    ! Top level for del^4 diffusion
      integer kmxhd2    ! Bottom level for increased del^2 diffusion
      integer kmxhdc    ! Number of levels to apply truncation (also in namelist)
      integer nindex    ! Starting index for spectral truncation
      integer nmaxhd    ! Maximum two dimensional wave number
!