Index | Rundeck: E6TomaF40 | Created: Sat May 18 03:30:40 EDT 2024 |
VERTICALRES | File: AtmLayering.F90 |
Author :
Version:
Subroutines:
Global Variables:
- grav : used from constant
- mb2kg : used from constant
- psf :
real*8, parameter
- global mean surface pressure (mb)
Initial Value= 984d0
- iii :
integer, private
- lmbig :
integer, parameter, private
- Initial Value
= 200
- lm :
integer, parameter
- = number of dynamical layers
Initial Value= layering%lm
Used by: | :read_aic | DYNAMICS:daily_atmdyn |
- plbot :
- nominal pressure levels at bottom of layers (mb)
Used by: | THREED_MASS_UNFINISHED |
- l12 :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l20 :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l40 :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l96 :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l96smoothed :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l102 :
type(layering_t), parameter, private
- Initial Value
= layering_t
- l102smoothed :
type(layering_t), parameter, private
- Initial Value
= layering_t
- layering :
type(layering_t), parameter, private
- Initial Value
= L40
- ls1_nominal :
integer, parameter
- Initial Value
= layering%ls1_nominal
Used by: | THREED_MASS_UNFINISHED |
- delp :
real*8, dimension(lm), parameter, private
- nominal pressure thicknesses of layers (mb)
Initial Value= plbot(1:lm)
- pmtop :
real*8, parameter
- model top pressure (mb)
Initial Value= plbot(lm+1)
- mdrya :
real*8, parameter
- = dry atmospheric mass (kg/m^2) = 100*PSF/GRAV
Initial Value= psf*mb2kg
Used by: | DYNAMICS:daily_atmdyn |
- mtop :
real*8, parameter
- = mass above dynamical top (kg/m^2) = 100*PMTOP/GRAV
Initial Value= pmtop*mb2kg
Used by: | DYNAMICS:daily_atmdyn |
- sige_ :
real*8, dimension(lm+1), parameter, private
- Initial Value
= (plbot-plbot(lm+1))
- wtfix0 :
real*8, dimension(lm+1), parameter, private
- Initial Value
= &
- pwtfix :
real*8, dimension(lm+1), parameter, private
- Initial Value
= plbot*wtfix
- cvar :
real*8, dimension(lm+1), parameter, private
- Initial Value
= (1d0-wtfix)
- dcvar :
real*8, dimension(lm), parameter, private
- Initial Value
= cvar(1:lm)
- mfix :
real*8, dimension(lm), parameter
- Initial Value
= dpfix*mb2kg
- mfrac :
real*8, dimension(lm), parameter
- Initial Value
= dcvar
Used by: | DYNAMICS:daily_atmdyn |
- hybm :
real*8, dimension(lm+1), parameter, public
- conventional nomenclature for edge-pressure usage
Initial Value= cvar
- hyam :
real*8, dimension(lm+1), parameter, public
- conventional nomenclature for edge-pressure usage
Initial Value= plbfix