Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
mstcnv | Module: CLOUDS | File: CLOUDS2.F90 |
Author : Menon saving aerosols mass for CDNC prediction
Version:
Declaration:
subroutine mstcnv(ierr, lerr, i_debug, j_debug)
- adv1d
- Module: Global File: QUSDEF.f
adv1d implements the quadratic upstream scheme in one dimension
- qsat
- dqsatdt
- thbar
- mass_flux
- Module: CLOUDS File: CLOUDS2.F90
- convective_microphysics
- Module: CLOUDS File: CLOUDS2.F90
CONVECTIVE_MICROPHYSICS calculates convective microphysics and precip condensate
- precip_mp
- Module: CLOUDS File: CLOUDS2.F90
- mc_precip_phase
- Module: CLOUDS File: CLOUDS2.F90
MC_PRECIP_PHASE calculates the convective precip phase
- mc_cloud_fraction
- Module: CLOUDS File: CLOUDS2.F90
MC_CLOUD_FRACTION calculates convective cloud fraction
- anvil_optical_thickness
- Module: CLOUDS File: CLOUDS2.F90
MC_OPTICAL_THICKNESS calculates anvil cloud optical thickness and droplet radius
- dqsatdt :
real*8
- dQSAT/dT
- precip_mp :
real*8
- mass density of precipitating condensate (kg/m^3)
- qsat :
real*8
- saturation specific humidity
- thbar :
real*8
- virtual temperature at layer edge
- dqsatdt :
real*8
- dQSAT/dT
- precip_mp :
real*8
- mass density of precipitating condensate (kg/m^3)
- qsat :
real*8
- saturation specific humidity
- thbar :
real*8
- virtual temperature at layer edge
- airm0 :
real*8, parameter
- air mass used to compute convective cloud cover
Initial Value= 100.d0
- ck1 :
real*8, parameter
- a tunning const.
Initial Value= 1.
- cn0 :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- cn0i :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- cn0g :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- itmax :
integer, parameter
- max iteration indices
Initial Value= 50
- fitmax :
real*8, parameter
- set to 1/ITMAX
Initial Value= 1d0/ITMAX
- pn :
real*8, parameter
- tuning exponential for computing WV
Initial Value= 1.d0
- rhog :
real*8, parameter
- density of graupel and ice particles
Initial Value= 400.
- rhoip :
real*8, parameter
- density of graupel and ice particles
Initial Value= 100.
- airm0 :
real*8, parameter
- air mass used to compute convective cloud cover
Initial Value= 100.d0
- ck1 :
real*8, parameter
- a tunning const.
Initial Value= 1.
- cn0g :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- cn0i :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- cn0 :
real*8, parameter
- intercepts of Marshall-Palmer particle size dist.
Initial Value= 8.d6
- itmax :
integer, parameter
- max iteration indices
Initial Value= 50
- fitmax :
real*8, parameter
- set to 1/ITMAX
Initial Value= 1d0/ITMAX
- pn :
real*8, parameter
- tuning exponential for computing WV
Initial Value= 1.d0
- rhoip :
real*8, parameter
- density of graupel and ice particles
Initial Value= 100.
- rhog :
real*8, parameter
- density of graupel and ice particles
Initial Value= 400.
- cm :
real*8, dimension(0:lm)
- air mass of subsidence
- dum :
real*8, dimension(kmax, lm)
- changes of UM,VM
- dvm :
real*8, dimension(kmax, lm)
- changes of UM,VM
- umdnl :
real*8, dimension(kmax, lm)
-
- vmdnl :
real*8, dimension(kmax, lm)
- cm :
real*8, dimension(0:lm)
- air mass of subsidence
- buoy :
-
- ccm :
- convective plume mass (mb)
- cdheat :
- heating due to condensation
- cmneg :
-
- condip :
- condensate mass density (kg/m^3)
- condgp :
- condensate mass density (kg/m^3)
- condv :
- condensate mass density (kg/m^3)
- condp1 :
- condensate mass density (kg/m^3)
- condp :
- condensate mass density (kg/m^3)
- cond :
- condensate mass density (kg/m^3)
- condpt :
- temporary variables to save CONDP
- dsmr :
- Vertical profiles of T/Q and changes
- dqmr :
- Vertical profiles of T/Q and changes
- dsm :
- Vertical profiles of T/Q and changes
- dqm :
- Vertical profiles of T/Q and changes
- ddm :
- downdraft mass (mb)
- dmr :
- change in air mass
- dm :
- change in air mass
- ent :
-
- f :
-
- heat1 :
- heating needed for phase change
- ml :
- layer air mass (mb)
- qmt :
- dummy variables
- smt :
- dummy variables
- qm1 :
- dummy variables
- sm1 :
- dummy variables
- qmold :
- profiles prior to any moist convection
- smold :
- profiles prior to any moist convection
- smdnl :
-
- tpsav :
- array to save plume temperature (set once) (K)
- taumc1 :
-
- wcu2 :
-
- wcu :
-
- sumv1 :
-
- sumu1 :
-
- sumv :
-
- sumu :
-
- vmp :
- momentum carried by convective plumes
- ump :
- momentum carried by convective plumes
- vmdn :
-
- umdn :
- dummy variables
- dvm :
real*8, dimension(kmax, lm)
- changes of UM,VM
- dum :
real*8, dimension(kmax, lm)
- changes of UM,VM
- vmdn :
-
- umdnl :
real*8, dimension(kmax, lm)
-
- smomdn :
-
- smompmax :
-
- smomp :
-
- qmomdn :
-
- qmompmax :
-
- qmomp :
-
- dsmomr :
-
- dsmom :
-
- dqmomr :
-
- dqmom :
-
- fmom :
-
- smomold :
-
- smomdnl :
-
- qmomold :
-
- qmomdnl :
-
- below_cloud :
logical
- is the current level below cloud?
- mc1 :
logical
- true for the first convective event
- i_debug :
integer, intent(in)
- j_debug :
integer, intent(in)
- ierr :
integer, intent(out)
- error reports from advection
- lerr :
integer, intent(out)
- error reports from advection
- ic :
integer
- integer for cloud types
- iter :
integer
- number for iteration
- itype :
integer
- convective cloud types
- ierrt :
integer
- error reports from advection
- k :
integer
- loop variables
- ksub :
integer
- number, 1/number of subsidence iterations
- logical :
- Variables
- below_cloud :
logical
- is the current level below cloud?
- mc1 :
logical
- true for the first convective event
- integer :
- Variables
- ic :
integer
- integer for cloud types
- iter :
integer
- number for iteration
- itype :
integer
- convective cloud types
- lerr :
integer, intent(out)
- error reports from advection
- ierr :
integer, intent(out)
- error reports from advection
- lerrt :
- error reports from advection
- ierrt :
integer
- error reports from advection
- n :
- loop variables
- l :
- loop variables
- k :
integer
- loop variables
- byksub :
- number, 1/number of subsidence iterations
- ksub :
integer
- number, 1/number of subsidence iterations
- ldraft :
- the layer at which the downdraft orginates
- lmax :
- the base, top layers of a convective event
- lmin :
- the base, top layers of a convective event
- ldmin :
- the lowest layer to which the downdraft descends
- lfrz :
- freezing level
- lm1 :
-
- mccont :
- integer to count convective events
- minlvl :
- the lowest, the highest layer of convective events
- maxlvl :
- the lowest, the highest layer of convective events
- nppl :
- iteration counter for computing MC area partition
- nsub :
- LMAX - LMIN + 1
- real :
- *8 Variables
- cldref :
- ,
- cdhsum :
- ,
- cdhm :
- ,
- cdhdrt :
- ,
- bypblm :
- ,
- betau :
- ,
- beta :
- ,
- alphau :
- ,
- alpha :
- ,
- evpsum :
- ,
- ddrold :
- ,
- ddrup :
- ,
- dq :
- ,
- dqsum :
- ,
- gama :
- ,
- frat2 :
- ,
- frat1 :
- ,
- fmp2 :
- ,
- fddp :
- ,
- fddl :
- ,
- fcloud :
- ,
- fcld :
- ,
- fcdh1 :
- ,
- fcdh :
- ,
- qnx :
- ,
- qmpt :
- ,
- qedge :
- ,
- qup :
- ,
- qdn :
- ,
- qmo2 :
- ,
- qmo1 :
- ,
- qenv :
- ,
- qmpt :
- ,
- qmix :
- ,
- qmdn :
- ,
- qmn2 :
- ,
- qmn1 :
- ,
- smpt :
- ,
- sedge :
- ,
- sup :
- ,
- sdn :
- ,
- smo2 :
- ,
- smo1 :
- ,
- senv :
- ,
- smpt :
- ,
- smix :
- ,
- smdn :
- ,
- smn2 :
- ,
- smn1 :
- ,
- svedg :
- ,
- svup :
- ,
- svdn :
- ,
- sumdp :
- ,
- sumaj :
- ,
- wmedg :
-
- wmup :
-
- wmdn :
-
- wconst :
-
- wtem :
-
- tratio :
-
- tturb :
-
- tnx :
-
- tig :
-
- tem :
-
- temwm :
-
- real :
- *8 Variables
- condmu :
- convective condensate in Kg/m^3
- cldm :
- subsidence due to convection (mb)
- contce :
- scaling factor for entrainment strength
- dci :
- critical cloud particle sizes for onset of precip
- dcg :
- critical cloud particle sizes for onset of precip
- dcw :
- critical cloud particle sizes for onset of precip
- dmse1 :
- difference in moist static energy
- dmse :
- difference in moist static energy
- dfp :
- an iterative increment
- dmmix :
-
- ddraft :
- downdraft mass (mb)
- delta :
- fraction of plume that stays in the layer
- dqevp :
- amount of condensate that evaporates in downdrafts
- eplume :
- mass of entrained air (mb)
- etadn :
- initial downdraft mass / updraft mass
- etal1 :
- fractional entrainment rate
- edraft :
- mass of air entrained into downdrafts (mb)
- flami :
- Marshall-Palmer lambda for water, graupel and ice
- flamg :
- Marshall-Palmer lambda for water, graupel and ice
- flamw :
- Marshall-Palmer lambda for water, graupel and ice
- fi :
- fractions of glaciated mass in graupel and ice
- fg :
- fractions of glaciated mass in graupel and ice
- fmc1 :
- fraction of grdibox occupied by moist convection + subsidence
- fclw :
- fraction of condensate in plume that remains as CLW
- fmp0 :
- less entraining convective mass (mb)
- fplume :
- convective plume mass / layer mass
- fctype :
- fraction of total convective mass for each convective cloud type
- fddrt :
- fraction of precipitating condensate avaliable for re-evaporation
- fentr :
- entrained mass / convective mass
- fentra :
- entrained mass / layer mass
- fevap :
- fraction of layer mass available for precip evaporation
- fleft :
- fraction of plume after removing downdraft mass
- fqcond :
- fraction of water vapor that condenses in plume
- fqcondv :
- fraction of condensate that is lofted
- fqevp :
- fraction of water vapor that evaporates in downdraft
- fprcp :
- fraction of evaporated precipitation
- fsevp :
- fraction of energy lost to evaporate
- fssum :
- fraction of energy lost to evaporate
- hdep :
-
- pblm :
- PBL height (m) and air mass in PBL (mb)
- hpbl :
- PBL height (m) and air mass in PBL (mb)
- lhx :
- latent heat of evaporation or sublimation (J/Kg)
- mplum1 :
- mass of convective plume (mb)
- mplume :
- mass of convective plume (mb)
- mcloud :
- air mass available for re-evaporation of precip (mb)
- mpmax :
- mass of convective plume at the detrainment level (mb)
- mpold :
-
- mcdnci :
- cloud droplet # for warm,cold moist conv clouds (cm^-3)
- mcdncw :
- cloud droplet # for warm,cold moist conv clouds (cm^-3)
- mndi :
- Menon Stuff
- mndl :
- Menon Stuff
- mndo :
- Menon Stuff
- smpmax :
- values of QMP, SMP in detrained air
- qmpmax :
- values of QMP, SMP in detrained air
- qsatc :
- saturation vapor mixing ratio
- qsatmp :
- plume's saturation vapor mixing ratio
- rclde :
- cloud particle radius, effective radius (microns)
- rcld :
- cloud particle radius, effective radius (microns)
- rho :
- air density
- qmp :
- plume's SM, QM
- smp :
- plume's SM, QM
- slh :
- LHX/SHA
- tadj :
- adjustment time for stablization of cloud base by cumulus mass flux
- tp :
- plume's temperature (K)
- tvp :
-
- told1 :
- old temperatures
- told :
- old temperatures
- vt :
- precip terminal velocity (m/s)
- wmix :
-
- w2tem :
-
- work :
- work done on convective plume
- wmax :
- specified maximum convective updraft speed (m/s)
- wv :
- convective updraft speed (m/s)
- vsum :
real*8
- lborrow1 :
integer
- tmold :
real*8, dimension(lm, ntm)
- : old TM (tracer mass)
- tm1 :
real*8, dimension(lm, ntm)
- tmomold :
real*8, dimension(nmom, lm, ntm)
- tmp :
real*8, dimension(ntm)
- tmpmax :
real*8, dimension(ntm)
- tenv :
real*8, dimension(ntm)
- tmdn :
real*8, dimension(ntm)
- tm_dum :
real*8, dimension(ntm)
- dtr :
real*8, dimension(ntm)
- tmomp :
real*8, dimension(nmom, ntm)
- tmompmax :
real*8, dimension(nmom, ntm)
- tmomdn :
real*8, dimension(nmom, ntm)
- trpcrp :
- tracer mass in precip
- fqcondt :
real*8, dimension(NTM)
- fraction of tracer that condenses
- fqevpt :
real*8, dimension(NTM)
- fraction of tracer that evaporates (in downdrafts)
- fprcpt :
real*8, dimension(NTM)
- fraction of tracer that evaporates (in net re-evaporation)
- fwasht :
real*8, dimension(NTM)
- fraction of tracer scavenged by below-cloud precipitation
- trprcp :
real*8, dimension(ntm)
- wmxtr :
real*8
- available water mixing ratio for tracer condensation (kg/kg)?
- precip_mm :
real*8
- precipitation (mm) from the grid box above for washout
- thlaw :
real*8, dimension(ntm)
- Henry's Law determination of amount of tracer dissolution
- thwash :
real*8, dimension(ntm)
- tr_lef :
real*8, dimension(ntm)
- limits precursor dissolution following sulfate formation
- tmfac :
real*8, dimension(ntm)
- used to adjust tracer moments
- cldsavt :
real*8
- tr_lef :
real*8, dimension(ntm)
- limits precursor dissolution following sulfate formation
- thlaw :
real*8, dimension(ntm)
- Henry's Law determination of amount of tracer dissolution
- tmfac :
real*8, dimension(ntm)
- used to adjust tracer moments
- igas :
integer
- heff :
real*8
- wa_vol :
real*8
- Cloud water volume (L). Used by GET_SULFATE.
- sulfin :
real*8, dimension(aqchem_count)
- sulfinom :
real*8, dimension(aqchem_count)
- sulfinc :
real*8, dimension(aqchem_count)
- sulfout :
real*8, dimension(aqchem_count)
- tr_left :
real*8, dimension(aqchem_count)
- iaqch :
integer
- sntm :
integer, parameter
- Initial Value
= 31
- condpc :
real*8, dimension(lm)
- mcdnci :
- cloud droplet # for warm,cold moist conv clouds (cm^-3)
- mcdncw :
- cloud droplet # for warm,cold moist conv clouds (cm^-3)