comqfl.h

来自「CCSM Research Tools: Community Atmospher」· C头文件 代码 · 共 23 行

!----------------------------------------------------------------------- 
! 
! Purpose: Global integrals for moisture and mass conservation and geopotential height
! 
!-----------------------------------------------------------------------
!
   real(r8) tmass(plat)  ! Mass integral for each latitude pair
   real(r8) tmass0       ! Specified dry mass of atmosphere
   real(r8) tmassf       ! Global mass integral
   real(r8) qmassf       ! Global moisture integral
   real(r8) fixmas       ! Proportionality factor for ps in dry mass fixer
   real(r8) qmass1       ! Contribution to global moisture integral (mass
                         !  weighting is based upon the "A" part of the hybrid grid)
   real(r8) qmass2       ! Contribution to global moisture integral (mass
                         !  weighting is based upon the "B" part of the hybrid grid)
   real(r8) pdela(plond,plev)   ! pressure difference between interfaces (pressure
                         !  defined using the "A" part of hybrid grid only)
   real(r8) zgsint       ! global integral of geopotential height
 
   common /comqfl/ tmass, tmass0, tmassf
   common /comqfl/ qmassf ,fixmas ,qmass1, qmass2, pdela
   common /comqfl/ zgsint