Index

Rundeck: E6TomaF40

Created: Fri May 17 03:30:39 EDT 2024

lscond

Module: CLOUDS

File: CLOUDS2.F90

Summary: LSCOND column physics of large scale condensation
Author : Menon end of addition comment out the RCLDE definition below
Version:

---

Declaration:

subroutine lscond(ierr, wmerr, lerr, i_debug, j_debug)

Calls the following subroutines/functions:

ctmix

Module: Global File: QUSDEF.f
CTMIX Cloud top mixing of tracer moments (incl. q,t) from CONDSE

qsat

dqsatdt

thbar

Variables:

tmax_ice :

maximum temperature for virtual mixed phase (VMP) microphysics

tmin_water :

minimum temperature for VMP

cm00ice :

autoconv. rates (1/s) for water, ice when using VMP

cm00liq :

autoconv. rates (1/s) for water, ice when using VMP

wtliq : real*8

VMP temperature interp. weight

lerr : integer, intent(out)

error reporting

wmerr : real*8, intent(out)

error reporting

ierr : integer, intent(out)

error reporting

i_debug : integer, intent(in)

j_debug : integer, intent(in)

debug_out : logical

lhx : real*8

qsat : real*8

saturation humidity

dqsatdt : real*8

dQSAT/dT

ermax : real*8

cm00 : real*8

upper limit for autoconversion rate

airm0 : real*8, parameter

scaling factor for computing rain evaporation
Initial Value = 100.d0

hefold : real*8, parameter

e-folding length for computing HDEP
Initial Value = 500.

coefm : real*8, parameter

coefficient for ratio of cloud water amount and WCONST
Initial Value = 10.

coeft : real*8, parameter

coefficient used in computing PRATM
Initial Value = 2.5

coesig : real*8, parameter

coefficient for equ. 23 of Del Genio et al. (1996)
Initial Value = 1d-3

coeec : real*8, parameter

coefficient for computing cloud evaporation
Initial Value = 1000.

erp : integer, parameter

exponential power for computing ER
Initial Value = 2

gbyairm0 : real*8, parameter

Initial Value = GRAV/AIRM0

tem1 : real*8

rclde1 : real*8

dummy :

variables

dummy :

variables

umo1 : real*8, dimension(kmax)

umo2 : real*8, dimension(kmax)

umn1 : real*8, dimension(kmax)

umn2 : real*8, dimension(kmax)

miscellaneous :

vertical arrays

vmo1 : real*8, dimension(kmax)

vmo2 : real*8, dimension(kmax)

vmn1 : real*8, dimension(kmax)

vmn2 : real*8, dimension(kmax)

qsatl :

saturation water vapor mixing ratio

rhf :

environmental relative humidity

ath :

change in potential temperature

sq :

ERMAX dummy variables

er :

evaporation of precip

qheati :

change of latent heat

qheatl :

change of latent heat

qheat :

change of latent heat

cleara :

fraction of clear region

prep :

precip conversion rate

rh00 :

threshold relative humidity

ec :

cloud evaporation rate

wmxm :

cloud water mass (mb)

preice : real*8, dimension(lm+1)

precip entering layer top for total, snow

prebar : real*8, dimension(lm+1)

precip entering layer top for total, snow

trprbar : real*8, dimension(ntm, lm+1)

tracer precip entering layer top for total (kg)

tm2_unmixed : real*8

tmom2_unmixed : real*8, dimension(nmom)

dter :

change of tracer by evaporation (kg)

fwtoq : real*8

fraction of CLW that goes to water vapour

fpr : real*8

fraction of CLW that precipitates

fer : real*8

fraction of precipitate that evaporates

dtprt :

tracer-specific change of tracer by precip (kg)

dtert :

tracer-specific change of tracer by evaporation (kg)

dtwrt : real*8

tracer-specific change of tracer by washout (kg)

dtqwt :

tracer-specific change of tracer by condensation (kg)

fwtoqt :

tracer-specific fraction of tracer in CLW that evaporates

fqtowt :

tracer-specific fraction of gas tracer condensing in CLW

fprt : real*8

tracer-specific fraction of tracer in CLW that precipitates

fert :

tracer-specific fraction of tracer in precipitate evaporating

fqcondt :

fraction of tracer that condenses

twmtmp : real*8

below_cloud : logical

logical- is the current level below cloud?

cloud_yet : logical

logical- in L loop, has there been any cloud so far?

prliq : real*8

fwasht : real*8, dimension(NTM)

fraction of tracer scavenged by below-cloud precipitation

wmxtr : real*8

available water mixing ratio for tracer condensation (kg/kg)?

b_beta_dt : real*8

precipitating gridbox fraction from lowest precipitating

precip_mm : real*8

precipitation (mm) from the grid box above for washout

tm_dum : real*8, dimension(NTM)

dtr : real*8, dimension(NTM)

thlaw : real*8, dimension(ntm)

Henry's Law determination of amount of tracer dissolution

tr_lef : real*8, dimension(ntm)

limits precurser dissolution following sulfate formation

thwash : real*8, dimension(NTM)

Henry's Law for below cloud dissolution

tmfac : real*8, dimension(NTM)

used to adjust tracer moments

tmfac2 : real*8, dimension(NTM)

used to adjust tracer moments

cldsavt : real*8

is present cloud fraction, saved for tracer use

tr_lef : real*8, dimension(ntm)

limits precurser dissolution following sulfate formation

thlaw : real*8, dimension(ntm)

Henry's Law determination of amount of tracer dissolution

thwash : real*8, dimension(NTM)

Henry's Law for below cloud dissolution

tmfac2 : real*8, dimension(NTM)

used to adjust tracer moments

tmfac : real*8, dimension(NTM)

used to adjust tracer moments

cldsavt : real*8

is present cloud fraction, saved for tracer use

cldprec : real*8

cloud fraction at lowest precipitating level

igas : integer

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)

iaqch : integer

lhx_wa : real*8

airmr : real*8

beta : real*8

dummy variabls

bmax : real*8

dummy variabls

sndo : real*8

sndl : real*8

sndi : real*8

scdncw : real*8

scdnci : real*8

rbeta : real*8

newcdn : real*8

oldcdn : real*8

vvel_sv : real*8, dimension(lm)

cldsav0 : real*8, dimension(lm)

snd_l : real*8, dimension(lm)

dsu : real*8, dimension(sntm, lm)

dpp : real*8

tempr : real*8

rhodk : real*8

ppres : real*8

prs : real*8

d3dl : real*8, dimension(LM)

pratm :

dummy variabls

ck2 :

dummy variabls

ck1 :

dummy variabls

ckij :

dummy variabls

cbfc0 :

dummy variabls

bmax : real*8

dummy variabls

beta : real*8

dummy variabls

smo12 :

dummy variables

smn12 :

dummy variables

airmr : real*8

cbf :

enhancing factor for precip conversion

ck :

ratio of cloud top jumps in moist static energy and total water

ckm :

CTEI threshold in MacVean and Mason theory

ckr :

CTEI threshold in Randall theory

cm :

conversion rate for large cloud water content

cm1 :

limiting autoconversion rate for large cloud water content

cm0 :

limiting autoconversion rate for large cloud water content

dfx :

iteration increment

dq :

condensed water vapor

dqsdt :

derivative of saturation vapor pressure w.r.t. temperature

dqup :

dummy variables

dqsum :

dummy variables

drhdt :

time change of relative humidity

dse :

moist static energy jump at cloud top

dsec :

critical DSE for CTEI to operate

dsfdif :

DSE-DSEC

dwdt1 :

time change rates of cloud water

dwdt :

time change rates of cloud water

ecrate :

cloud droplet evaporation rate

expst :

exponential term in determining the fraction in CTEI

fcld :

cloud fraction

frat :

fraction of mixing in CTEI

fmix :

fraction of mixing in CTEI

fmass :

mass of mixing in CTEI

fplume :

fraction of mixing in CTEI

fpmax :

max fraction of mixing in CTEI

fqtow :

fraction of water vapour that goes to CLW

funi :

the probablity for ice cloud to form

funio :

FUNI over land, ocean

funil :

FUNI over land, ocean

hphase :

latent heats for changing phase

hchang :

latent heats for changing phase

hpbl :

layer depth (m) (note change of unit km-->m)

hdep :

layer depth (m) (note change of unit km-->m)

oldlhx :

previous LHX

oldlat :

previous LHX

pfr :

PROBABLITY OF GLACIATION OF SUPER-COOLED WATER

pmi :

icy precip entering the layer top

pml :

layer's cloud water devided by GRAV

pratio :

PMI/PML

qconv :

convergence of latent heat

qmo2 :

dummy variables

qmo1 :

dummy variables

qmn2 :

dummy variables

qmn1 :

dummy variables

qlt2 :

dummy variables

qlt1 :

dummy variables

qheatc :

dummy variables

qnewu :

updated specific humidity

qnew :

updated specific humidity

qoldu :

previous specific humidity

qold :

previous specific humidity

qsatc :

saturation vapor mixing ratio

qsate :

saturation vapor mixing ratio w.r.t. water

randno :

random number

rclde :

cloud particle's radius, effective radius

rcld :

cloud particle's radius, effective radius

rhi :

relative humidity w.r.t. ice

rhn :

dummy variable

rho :

air density

sigk :

dummy variables

rhw :

dummy variables

rht1 :

dummy variables

sedge :

potential temperature at layer edge

tlt1 :

dummy variables

tht2 :

dummy variables

tht1 :

dummy variables

tevap :

dummy variables

temp :

dummy variables

tem :

dummy variables

smo2 :

dummy variables

smo1 :

dummy variables

smn2 :

dummy variables

smn1 :

dummy variables

tnewu :

updated tempertures

tnew :

updated tempertures

toldup :

previous temperatures

toldu :

previous temperatures

told :

previous temperatures

vdef :

= VVEL - VSUB

wmx1 :

dummy variables

wmt2 :

dummy variables

wmt1 :

dummy variables

wmo2 :

dummy variables

wmo1 :

dummy variables

wmn2 :

dummy variables

wmn1 :

dummy variables

wconst :

dummy variables

qclnew :

QCINEW updated cloud water mixing ratio

wtem :

cloud water density (g m**-3)

vvel :

vertical velocity (cm/s)

fcond :

QF dummy variables

iter : integer

loop variables

ln : integer

loop variables

bandf : logical

true if Bergero-Findeisen proc. occurs

form_clouds : logical

true if clouds are formed

n : integer

loop variables

l : integer

loop variables

k : integer

loop variables

thbar : real*8

potential temperature at layer edge

fsslrat :

ratio of lower to upper layer potential SS cloud fraction

qmom2_sv :

pre-CTMIX upper-layer S,Q moments

smom2_sv :

pre-CTMIX upper-layer S,Q moments