Functions/Subroutines
subroutine, public	micro_mg_init (kind, gravit, rair, rh2o, cpair, tmelt_in, latvap, latice, rhmini_in, micro_mg_dcs, micro_mg_dcs_tdep, microp_uniform_in, do_cldice_in, use_hetfrz_classnuc_in, micro_mg_precip_frac_method_in, micro_mg_berg_eff_factor_in, errstring)

subroutine, public	micro_mg_tend (mgncol, nlev, deltatin, t, q, qcn, qin, ncn, nin, relvar, accre_enhan, p, pdel, pint, cldn, liqcldf, icecldf, qcsinksum_rate1ord, naai, npccn, rndst, nacon, tlat, qvlat, qctend, qitend, nctend, nitend, effc, effc_fn, effi, prect, preci, nevapr, evapsnow, prain, prodsnow, cmeout, deffi, pgamrad, lamcrad, qsout, dsout, rflx, sflx, qrout, reff_rain, reff_snow, qcsevap, qisevap, qvres, cmeitot, vtrmc, vtrmi, qcsedten, qisedten, pratot, prctot, mnuccctot, mnuccttot, msacwitot, psacwstot, bergstot, bergtot, melttot, homotot, qcrestot, prcitot, praitot, qirestot, mnuccrtot, pracstot, meltsdttot, frzrdttot, mnuccdtot, nrout, nsout, refl, arefl, areflz, frefl, csrfl, acsrfl, fcsrfl, rercld, ncai, ncal, qrout2, qsout2, nrout2, nsout2, drout2, dsout2, freqs, freqr, nfice, qcrat, errstring, tnd_qsnow, tnd_nsnow, re_ice, prer_evap, frzimm, frzcnt, frzdep)

elemental real(r8) function	calc_ab (t, qv, xxl)

elemental subroutine	size_dist_param_liq (qcic, ncic, cdnl, rho, nadjflag, pgam, lamc)

elemental subroutine	size_dist_param_ice (qiic, dcst, niic, lami, n0i)

elemental subroutine	size_dist_param_rain (qric, nric, lamr, n0r)

elemental subroutine	size_dist_param_snow (qsic, nsic, lams, n0s)

real(r8) elemental function	avg_diameter (q, n, rho_air, rho_sub)

real(r8) elemental function	var_coef (relvar, a)

elemental subroutine	ice_deposition_sublimation (deltat, t, qv, qc, qi, ni, lcldm, icldm, naai, rho, dv, qvl, qvi, dcst, berg, vap_dep, ice_sublim)

elemental subroutine	kk2000_liq_autoconversion (qcic, ncic, rho, relvar, prc, nprc, nprc1)

elemental subroutine	ice_autoconversion (t, qiic, lami, n0i, dcst, prci, nprci)

elemental subroutine	immersion_freezing (t, pgam, lamc, cdist1, qcic, relvar, mnuccc, nnuccc)

pure subroutine	contact_freezing (t, p, rndst, nacon, pgam, lamc, cdist1, qcic, relvar, mnucct, nnucct)

elemental subroutine	snow_self_aggregation (t, rho, asn, qsic, nsic, nsagg)

elemental subroutine	accrete_cloud_water_snow (t, rho, asn, uns, mu, qcic, ncic, qsic, pgam, lamc, lams, n0s, psacws, npsacws)

elemental subroutine	secondary_ice_production (t, psacws, msacwi, nsacwi)

elemental subroutine	accrete_rain_snow (t, rho, umr, ums, unr, uns, qric, qsic, lamr, n0r, lams, n0s, pracs, npracs)

elemental subroutine	heterogeneous_rain_freezing (t, qric, nric, lamr, mnuccr, nnuccr)

elemental subroutine	accrete_cloud_water_rain (qric, qcic, ncic, relvar, accre_enhan, pra, npra)

elemental subroutine	self_collection_rain (rho, qric, nric, nragg)

elemental subroutine	accrete_cloud_ice_snow (t, rho, asn, qiic, niic, qsic, lams, n0s, prai, nprai)

elemental subroutine	evaporate_sublimate_precip (deltat, t, p, rho, dv, mu, sc, q, qvl, qvi, lcldm, cldmax, arn, asn, qcic, qiic, qric, qsic, lamr, n0r, lams, n0s, pre, prds)

elemental subroutine	bergeron_process_snow (t, rho, dv, mu, sc, qvl, qvi, asn, qcic, qsic, lams, n0s, bergs)

elemental subroutine	calc_rercld (lamr, n0r, lamc, cdist1, pgam, dumr, qcic, rercld)

pure subroutine, public	micro_mg_get_cols (ncol, nlev, top_lev, qcn, qin, mgncol, mgcols)

subroutine	get_dcst (ncol, pver, temp, dcst)

pure real(r8) function, dimension(size(orig_val, 1), size(orig_val, 2) -1)	interp_to_mid (orig_val, weights)

Variables
logical, parameter, public	nccons = .false.

logical, parameter, public	nicons = .false.

integer, parameter	r8 = selected_real_kind(12)

real(r8), parameter	pi = 3.14159265358979323846_r8

real(r8), parameter	omsm = 0.99999_r8

real(r8), parameter	ncnst = 100.e6_r8

real(r8), parameter	ninst = 0.1e6_r8

real(r8), parameter	rhosn = 250._r8

real(r8), parameter	rhoi = 500._r8

real(r8), parameter	rhow = 1000._r8

real(r8), parameter	ac = 3.e7_r8

real(r8), parameter	bc = 2._r8

real(r8), parameter	as = 11.72_r8

real(r8), parameter	bs = 0.41_r8

real(r8), parameter	ai = 700._r8

real(r8), parameter	bi = 1._r8

real(r8), parameter	ar = 841.99667_r8

real(r8), parameter	br = 0.8_r8

real(r8), parameter	dsph = 3._r8

real(r8), parameter	f1s = 0.86_r8

real(r8), parameter	f2s = 0.28_r8

real(r8), parameter	f1r = 0.78_r8

real(r8), parameter	f2r = 0.308_r8

real(r8), parameter	eii = 0.1_r8

real(r8)	dcs

logical	dcs_tdep

real(r8), parameter	qsmall = 1.e-18_r8

real(r8), parameter	icsmall = 1.e-8_r8

real(r8), parameter	bimm = 100._r8

real(r8), parameter	aimm = 0.66_r8

real(r8), parameter	mi0 = 4._r8/3._r8pirhoi(10.e-6_r8)*3

real(r8), parameter	mi0l_min = 4._r8/3._r8pirhow(4.e-6_r8)*3

real(r8), parameter	csmin = -30._r8

real(r8), parameter	csmax = 26._r8

real(r8), parameter	mindbz = -99._r8

real(r8), parameter	minrefl = 1.26e-10_r8

real(r8)	g

real(r8)	r

real(r8)	rv

real(r8)	cpp

real(r8)	tmelt

real(r8)	xxlv

real(r8)	xlf

real(r8)	xxls

real(r8)	rhmini

logical	microp_uniform

logical	do_cldice

logical	use_hetfrz_classnuc

real(r8)	rhosu

real(r8)	icenuct

real(r8)	snowmelt

real(r8)	rainfrze

real(r8)	cons1

real(r8)	cons4

real(r8)	cons5

real(r8)	cons7

real(r8)	cons8

real(r8)	cons11

real(r8)	cons13

real(r8)	cons14

real(r8)	cons16

real(r8)	cons17

real(r8)	cons22

real(r8)	cons23

real(r8)	cons24

real(r8)	cons25

real(r8)	cons27

real(r8)	cons28

character(len=16)	micro_mg_precip_frac_method

real(r8)	micro_mg_berg_eff_factor

Function/Subroutine Documentation

◆ accrete_cloud_ice_snow()

elemental subroutine micro_mg1_5::accrete_cloud_ice_snow	(	real(r8), intent(in)	t,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	asn,
		real(r8), intent(in)	qiic,
		real(r8), intent(in)	niic,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	lams,
		real(r8), intent(in)	n0s,
		real(r8), intent(out)	prai,
		real(r8), intent(out)	nprai
	)

private

Here is the caller graph for this function:

◆ accrete_cloud_water_rain()

elemental subroutine micro_mg1_5::accrete_cloud_water_rain	(	real(r8), intent(in)	qric,
		real(r8), intent(in)	qcic,
		real(r8), intent(in)	ncic,
		real(r8), intent(in)	relvar,
		real(r8), intent(in)	accre_enhan,
		real(r8), intent(out)	pra,
		real(r8), intent(out)	npra
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ accrete_cloud_water_snow()

elemental subroutine micro_mg1_5::accrete_cloud_water_snow	(	real(r8), intent(in)	t,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	asn,
		real(r8), intent(in)	uns,
		real(r8), intent(in)	mu,
		real(r8), intent(in)	qcic,
		real(r8), intent(in)	ncic,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	pgam,
		real(r8), intent(in)	lamc,
		real(r8), intent(in)	lams,
		real(r8), intent(in)	n0s,
		real(r8), intent(out)	psacws,
		real(r8), intent(out)	npsacws
	)

private

Here is the caller graph for this function:

◆ accrete_rain_snow()

elemental subroutine micro_mg1_5::accrete_rain_snow	(	real(r8), intent(in)	t,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	umr,
		real(r8), intent(in)	ums,
		real(r8), intent(in)	unr,
		real(r8), intent(in)	uns,
		real(r8), intent(in)	qric,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	lamr,
		real(r8), intent(in)	n0r,
		real(r8), intent(in)	lams,
		real(r8), intent(in)	n0s,
		real(r8), intent(out)	pracs,
		real(r8), intent(out)	npracs
	)

private

Here is the caller graph for this function:

◆ avg_diameter()

real(r8) elemental function micro_mg1_5::avg_diameter	(	real(r8), intent(in)	q,
		real(r8), intent(in)	n,
		real(r8), intent(in)	rho_air,
		real(r8), intent(in)	rho_sub
	)

private

Here is the caller graph for this function:

◆ bergeron_process_snow()

elemental subroutine micro_mg1_5::bergeron_process_snow	(	real(r8), intent(in)	t,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	dv,
		real(r8), intent(in)	mu,
		real(r8), intent(in)	sc,
		real(r8), intent(in)	qvl,
		real(r8), intent(in)	qvi,
		real(r8), intent(in)	asn,
		real(r8), intent(in)	qcic,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	lams,
		real(r8), intent(in)	n0s,
		real(r8), intent(out)	bergs
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ calc_ab()

elemental real(r8) function micro_mg1_5::calc_ab	(	real(r8), intent(in)	t,
		real(r8), intent(in)	qv,
		real(r8), intent(in)	xxl
	)

private

Here is the caller graph for this function:

◆ calc_rercld()

elemental subroutine micro_mg1_5::calc_rercld	(	real(r8), intent(in)	lamr,
		real(r8), intent(in)	n0r,
		real(r8), intent(in)	lamc,
		real(r8), intent(in)	cdist1,
		real(r8), intent(in)	pgam,
		real(r8), intent(in)	dumr,
		real(r8), intent(in)	qcic,
		real(r8), intent(inout)	rercld
	)

private

Here is the caller graph for this function:

◆ contact_freezing()

pure subroutine micro_mg1_5::contact_freezing	(	real(r8), dimension(:), intent(in)	t,
		real(r8), dimension(:), intent(in)	p,
		real(r8), dimension(:,:), intent(in)	rndst,
		real(r8), dimension(:,:), intent(in)	nacon,
		real(r8), dimension(:), intent(in)	pgam,
		real(r8), dimension(:), intent(in)	lamc,
		real(r8), dimension(:), intent(in)	cdist1,
		real(r8), dimension(:), intent(in)	qcic,
		real(r8), dimension(:), intent(in)	relvar,
		real(r8), dimension(:), intent(out)	mnucct,
		real(r8), dimension(:), intent(out)	nnucct
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ evaporate_sublimate_precip()

elemental subroutine micro_mg1_5::evaporate_sublimate_precip	(	real(r8), intent(in)	deltat,
		real(r8), intent(in)	t,
		real(r8), intent(in)	p,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	dv,
		real(r8), intent(in)	mu,
		real(r8), intent(in)	sc,
		real(r8), intent(in)	q,
		real(r8), intent(in)	qvl,
		real(r8), intent(in)	qvi,
		real(r8), intent(in)	lcldm,
		real(r8), intent(in)	cldmax,
		real(r8), intent(in)	arn,
		real(r8), intent(in)	asn,
		real(r8), intent(in)	qcic,
		real(r8), intent(in)	qiic,
		real(r8), intent(in)	qric,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	lamr,
		real(r8), intent(in)	n0r,
		real(r8), intent(in)	lams,
		real(r8), intent(in)	n0s,
		real(r8), intent(out)	pre,
		real(r8), intent(out)	prds
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_dcst()

subroutine micro_mg1_5::get_dcst	(	integer, intent(in)	ncol,
		integer, intent(in)	pver,
		real(r8), dimension(ncol,pver), intent(in)	temp,
		real(r8), dimension(ncol,pver), intent(out)	dcst
	)

private

Here is the caller graph for this function:

◆ heterogeneous_rain_freezing()

elemental subroutine micro_mg1_5::heterogeneous_rain_freezing	(	real(r8), intent(in)	t,
		real(r8), intent(in)	qric,
		real(r8), intent(in)	nric,
		real(r8), intent(in)	lamr,
		real(r8), intent(out)	mnuccr,
		real(r8), intent(out)	nnuccr
	)

private

Here is the caller graph for this function:

◆ ice_autoconversion()

elemental subroutine micro_mg1_5::ice_autoconversion	(	real(r8), intent(in)	t,
		real(r8), intent(in)	qiic,
		real(r8), intent(in)	lami,
		real(r8), intent(in)	n0i,
		real(r8), intent(in)	dcst,
		real(r8), intent(out)	prci,
		real(r8), intent(out)	nprci
	)

private

Here is the caller graph for this function:

◆ ice_deposition_sublimation()

elemental subroutine micro_mg1_5::ice_deposition_sublimation	(	real(r8), intent(in)	deltat,
		real(r8), intent(in)	t,
		real(r8), intent(in)	qv,
		real(r8), intent(in)	qc,
		real(r8), intent(in)	qi,
		real(r8), intent(in)	ni,
		real(r8), intent(in)	lcldm,
		real(r8), intent(in)	icldm,
		real(r8), intent(in)	naai,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	dv,
		real(r8), intent(in)	qvl,
		real(r8), intent(in)	qvi,
		real(r8), intent(in)	dcst,
		real(r8), intent(out)	berg,
		real(r8), intent(out)	vap_dep,
		real(r8), intent(out)	ice_sublim
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ immersion_freezing()

elemental subroutine micro_mg1_5::immersion_freezing	(	real(r8), intent(in)	t,
		real(r8), intent(in)	pgam,
		real(r8), intent(in)	lamc,
		real(r8), intent(in)	cdist1,
		real(r8), intent(in)	qcic,
		real(r8), intent(in)	relvar,
		real(r8), intent(out)	mnuccc,
		real(r8), intent(out)	nnuccc
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ interp_to_mid()

pure real(r8) function, dimension(size(orig_val,1),size(orig_val,2)-1) micro_mg1_5::interp_to_mid	(	real(r8), dimension(:,:), intent(in)	orig_val,
		real(r8), dimension(:,:), intent(in)	weights
	)

private

Here is the caller graph for this function:

◆ kk2000_liq_autoconversion()

elemental subroutine micro_mg1_5::kk2000_liq_autoconversion	(	real(r8), intent(in)	qcic,
		real(r8), intent(in)	ncic,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	relvar,
		real(r8), intent(out)	prc,
		real(r8), intent(out)	nprc,
		real(r8), intent(out)	nprc1
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ micro_mg_get_cols()

pure subroutine, public micro_mg1_5::micro_mg_get_cols	(	integer, intent(in)	ncol,
		integer, intent(in)	nlev,
		integer, intent(in)	top_lev,
		real(r8), dimension(:,:), intent(in)	qcn,
		real(r8), dimension(:,:), intent(in)	qin,
		integer, intent(out)	mgncol,
		integer, dimension(:), intent(out), allocatable	mgcols
	)

◆ micro_mg_init()

subroutine, public micro_mg1_5::micro_mg_init	(	integer, intent(in)	kind,
		real(r8), intent(in)	gravit,
		real(r8), intent(in)	rair,
		real(r8), intent(in)	rh2o,
		real(r8), intent(in)	cpair,
		real(r8), intent(in)	tmelt_in,
		real(r8), intent(in)	latvap,
		real(r8), intent(in)	latice,
		real(r8), intent(in)	rhmini_in,
		real(r8), intent(in)	micro_mg_dcs,
		logical, intent(in)	micro_mg_dcs_tdep,
		logical, intent(in)	microp_uniform_in,
		logical, intent(in)	do_cldice_in,
		logical, intent(in)	use_hetfrz_classnuc_in,
		character(len=16), intent(in)	micro_mg_precip_frac_method_in,
		real(r8), intent(in)	micro_mg_berg_eff_factor_in,
		character(128), intent(out)	errstring
	)

◆ micro_mg_tend()

subroutine, public micro_mg1_5::micro_mg_tend	(	integer, intent(in)	mgncol,
		integer, intent(in)	nlev,
		real(r8), intent(in)	deltatin,
		real(r8), dimension(:,:), intent(in)	t,
		real(r8), dimension(:,:), intent(in)	q,
		real(r8), dimension(:,:), intent(in)	qcn,
		real(r8), dimension(:,:), intent(in)	qin,
		real(r8), dimension(:,:), intent(in)	ncn,
		real(r8), dimension(:,:), intent(in)	nin,
		real(r8), dimension(:,:), intent(in)	relvar,
		real(r8), dimension(:,:), intent(in)	accre_enhan,
		real(r8), dimension(:,:), intent(in)	p,
		real(r8), dimension(:,:), intent(in)	pdel,
		real(r8), dimension(:,:), intent(in)	pint,
		real(r8), dimension(:,:), intent(in)	cldn,
		real(r8), dimension(:,:), intent(in)	liqcldf,
		real(r8), dimension(:,:), intent(in)	icecldf,
		real(r8), dimension(:,:), intent(out)	qcsinksum_rate1ord,
		real(r8), dimension(:,:), intent(in)	naai,
		real(r8), dimension(:,:), intent(in)	npccn,
		real(r8), dimension(:,:,:), intent(in)	rndst,
		real(r8), dimension(:,:,:), intent(in)	nacon,
		real(r8), dimension(:,:), intent(out)	tlat,
		real(r8), dimension(:,:), intent(out)	qvlat,
		real(r8), dimension(:,:), intent(out)	qctend,
		real(r8), dimension(:,:), intent(out)	qitend,
		real(r8), dimension(:,:), intent(out)	nctend,
		real(r8), dimension(:,:), intent(out)	nitend,
		real(r8), dimension(:,:), intent(out)	effc,
		real(r8), dimension(:,:), intent(out)	effc_fn,
		real(r8), dimension(:,:), intent(out)	effi,
		real(r8), dimension(:), intent(out)	prect,
		real(r8), dimension(:), intent(out)	preci,
		real(r8), dimension(:,:), intent(out)	nevapr,
		real(r8), dimension(:,:), intent(out)	evapsnow,
		real(r8), dimension(:,:), intent(out)	prain,
		real(r8), dimension(:,:), intent(out)	prodsnow,
		real(r8), dimension(:,:), intent(out)	cmeout,
		real(r8), dimension(:,:), intent(out)	deffi,
		real(r8), dimension(:,:), intent(out)	pgamrad,
		real(r8), dimension(:,:), intent(out)	lamcrad,
		real(r8), dimension(:,:), intent(out)	qsout,
		real(r8), dimension(:,:), intent(out)	dsout,
		real(r8), dimension(:,:), intent(out)	rflx,
		real(r8), dimension(:,:), intent(out)	sflx,
		real(r8), dimension(:,:), intent(out)	qrout,
		real(r8), dimension(:,:), intent(out)	reff_rain,
		real(r8), dimension(:,:), intent(out)	reff_snow,
		real(r8), dimension(:,:), intent(out)	qcsevap,
		real(r8), dimension(:,:), intent(out)	qisevap,
		real(r8), dimension(:,:), intent(out)	qvres,
		real(r8), dimension(:,:), intent(out)	cmeitot,
		real(r8), dimension(:,:), intent(out)	vtrmc,
		real(r8), dimension(:,:), intent(out)	vtrmi,
		real(r8), dimension(:,:), intent(out)	qcsedten,
		real(r8), dimension(:,:), intent(out)	qisedten,
		real(r8), dimension(:,:), intent(out)	pratot,
		real(r8), dimension(:,:), intent(out)	prctot,
		real(r8), dimension(:,:), intent(out)	mnuccctot,
		real(r8), dimension(:,:), intent(out)	mnuccttot,
		real(r8), dimension(:,:), intent(out)	msacwitot,
		real(r8), dimension(:,:), intent(out)	psacwstot,
		real(r8), dimension(:,:), intent(out)	bergstot,
		real(r8), dimension(:,:), intent(out)	bergtot,
		real(r8), dimension(:,:), intent(out)	melttot,
		real(r8), dimension(:,:), intent(out)	homotot,
		real(r8), dimension(:,:), intent(out)	qcrestot,
		real(r8), dimension(:,:), intent(out)	prcitot,
		real(r8), dimension(:,:), intent(out)	praitot,
		real(r8), dimension(:,:), intent(out)	qirestot,
		real(r8), dimension(:,:), intent(out)	mnuccrtot,
		real(r8), dimension(:,:), intent(out)	pracstot,
		real(r8), dimension(:,:), intent(out)	meltsdttot,
		real(r8), dimension(:,:), intent(out)	frzrdttot,
		real(r8), dimension(:,:), intent(out)	mnuccdtot,
		real(r8), dimension(:,:), intent(out)	nrout,
		real(r8), dimension(:,:), intent(out)	nsout,
		real(r8), dimension(:,:), intent(out)	refl,
		real(r8), dimension(:,:), intent(out)	arefl,
		real(r8), dimension(:,:), intent(out)	areflz,
		real(r8), dimension(:,:), intent(out)	frefl,
		real(r8), dimension(:,:), intent(out)	csrfl,
		real(r8), dimension(:,:), intent(out)	acsrfl,
		real(r8), dimension(:,:), intent(out)	fcsrfl,
		real(r8), dimension(:,:), intent(out)	rercld,
		real(r8), dimension(:,:), intent(out)	ncai,
		real(r8), dimension(:,:), intent(out)	ncal,
		real(r8), dimension(:,:), intent(out)	qrout2,
		real(r8), dimension(:,:), intent(out)	qsout2,
		real(r8), dimension(:,:), intent(out)	nrout2,
		real(r8), dimension(:,:), intent(out)	nsout2,
		real(r8), dimension(:,:), intent(out)	drout2,
		real(r8), dimension(:,:), intent(out)	dsout2,
		real(r8), dimension(:,:), intent(out)	freqs,
		real(r8), dimension(:,:), intent(out)	freqr,
		real(r8), dimension(:,:), intent(out)	nfice,
		real(r8), dimension(:,:), intent(out)	qcrat,
		character(128), intent(out)	errstring,
		real(r8), dimension(:,:), intent(in), pointer	tnd_qsnow,
		real(r8), dimension(:,:), intent(in), pointer	tnd_nsnow,
		real(r8), dimension(:,:), intent(in), pointer	re_ice,
		real(r8), dimension(:,:), intent(out)	prer_evap,
		real(r8), dimension(:,:), intent(in), pointer	frzimm,
		real(r8), dimension(:,:), intent(in), pointer	frzcnt,
		real(r8), dimension(:,:), intent(in), pointer	frzdep
	)

Here is the call graph for this function:

◆ secondary_ice_production()

elemental subroutine micro_mg1_5::secondary_ice_production	(	real(r8), intent(in)	t,
		real(r8), intent(inout)	psacws,
		real(r8), intent(out)	msacwi,
		real(r8), intent(out)	nsacwi
	)

private

Here is the caller graph for this function:

◆ self_collection_rain()

elemental subroutine micro_mg1_5::self_collection_rain	(	real(r8), intent(in)	rho,
		real(r8), intent(in)	qric,
		real(r8), intent(in)	nric,
		real(r8), intent(out)	nragg
	)

private

Here is the caller graph for this function:

◆ size_dist_param_ice()

elemental subroutine micro_mg1_5::size_dist_param_ice	(	real(r8), intent(in)	qiic,
		real(r8), intent(in)	dcst,
		real(r8), intent(inout)	niic,
		real(r8), intent(out)	lami,
		real(r8), intent(out)	n0i
	)

private

Here is the caller graph for this function:

◆ size_dist_param_liq()

elemental subroutine micro_mg1_5::size_dist_param_liq	(	real(r8), intent(in)	qcic,
		real(r8), intent(inout)	ncic,
		real(r8), intent(in)	cdnl,
		real(r8), intent(in)	rho,
		logical, intent(in)	nadjflag,
		real(r8), intent(out)	pgam,
		real(r8), intent(out)	lamc
	)

private

Here is the caller graph for this function:

◆ size_dist_param_rain()

elemental subroutine micro_mg1_5::size_dist_param_rain	(	real(r8), intent(in)	qric,
		real(r8), intent(inout)	nric,
		real(r8), intent(out)	lamr,
		real(r8), intent(out)	n0r
	)

private

Here is the caller graph for this function:

◆ size_dist_param_snow()

elemental subroutine micro_mg1_5::size_dist_param_snow	(	real(r8), intent(in)	qsic,
		real(r8), intent(inout)	nsic,
		real(r8), intent(out)	lams,
		real(r8), intent(out)	n0s
	)

private

Here is the caller graph for this function:

◆ snow_self_aggregation()

elemental subroutine micro_mg1_5::snow_self_aggregation	(	real(r8), intent(in)	t,
		real(r8), intent(in)	rho,
		real(r8), intent(in)	asn,
		real(r8), intent(in)	qsic,
		real(r8), intent(in)	nsic,
		real(r8), intent(out)	nsagg
	)

private

Here is the caller graph for this function:

◆ var_coef()

real(r8) elemental function micro_mg1_5::var_coef	(	real(r8), intent(in)	relvar,
		real(r8), intent(in)	a
	)

private

Here is the caller graph for this function:

Variable Documentation

◆ ac

real(r8), parameter micro_mg1_5::ac = 3.e7_r8

private

◆ ai

real(r8), parameter micro_mg1_5::ai = 700._r8

private

◆ aimm

real(r8), parameter micro_mg1_5::aimm = 0.66_r8

private

◆ ar

real(r8), parameter micro_mg1_5::ar = 841.99667_r8

private

◆ as

real(r8), parameter micro_mg1_5::as = 11.72_r8

private

◆ bc

real(r8), parameter micro_mg1_5::bc = 2._r8

private

◆ bi

real(r8), parameter micro_mg1_5::bi = 1._r8

private

◆ bimm

real(r8), parameter micro_mg1_5::bimm = 100._r8

private

◆ br

real(r8), parameter micro_mg1_5::br = 0.8_r8

private

◆ bs

real(r8), parameter micro_mg1_5::bs = 0.41_r8

private

◆ cons1

real(r8) micro_mg1_5::cons1

private

◆ cons11

real(r8) micro_mg1_5::cons11

private

◆ cons13

real(r8) micro_mg1_5::cons13

private

◆ cons14

real(r8) micro_mg1_5::cons14

private

◆ cons16

real(r8) micro_mg1_5::cons16

private

◆ cons17

real(r8) micro_mg1_5::cons17

private

◆ cons22

real(r8) micro_mg1_5::cons22

private

◆ cons23

real(r8) micro_mg1_5::cons23

private

◆ cons24

real(r8) micro_mg1_5::cons24

private

◆ cons25

real(r8) micro_mg1_5::cons25

private

◆ cons27

real(r8) micro_mg1_5::cons27

private

◆ cons28

real(r8) micro_mg1_5::cons28

private

◆ cons4

real(r8) micro_mg1_5::cons4

private

◆ cons5

real(r8) micro_mg1_5::cons5

private

◆ cons7

real(r8) micro_mg1_5::cons7

private

◆ cons8

real(r8) micro_mg1_5::cons8

private

◆ cpp

real(r8) micro_mg1_5::cpp

private

◆ csmax

real(r8), parameter micro_mg1_5::csmax = 26._r8

private

◆ csmin

real(r8), parameter micro_mg1_5::csmin = -30._r8

private

◆ dcs

real(r8) micro_mg1_5::dcs

private

◆ dcs_tdep

logical micro_mg1_5::dcs_tdep

private

◆ do_cldice

logical micro_mg1_5::do_cldice

private

◆ dsph

real(r8), parameter micro_mg1_5::dsph = 3._r8

private

◆ eii

real(r8), parameter micro_mg1_5::eii = 0.1_r8

private

◆ f1r

real(r8), parameter micro_mg1_5::f1r = 0.78_r8

private

◆ f1s

real(r8), parameter micro_mg1_5::f1s = 0.86_r8

private

◆ f2r

real(r8), parameter micro_mg1_5::f2r = 0.308_r8

private

◆ f2s

real(r8), parameter micro_mg1_5::f2s = 0.28_r8

private

◆ g

real(r8) micro_mg1_5::g

private

◆ icenuct

real(r8) micro_mg1_5::icenuct

private

◆ icsmall

real(r8), parameter micro_mg1_5::icsmall = 1.e-8_r8

private

◆ mi0

real(r8), parameter micro_mg1_5::mi0 = 4._r8/3._r8*pi*rhoi*(10.e-6_r8)**3

private

◆ mi0l_min

real(r8), parameter micro_mg1_5::mi0l_min = 4._r8/3._r8*pi*rhow*(4.e-6_r8)**3

private

◆ micro_mg_berg_eff_factor

real(r8) micro_mg1_5::micro_mg_berg_eff_factor

private

◆ micro_mg_precip_frac_method

character(len=16) micro_mg1_5::micro_mg_precip_frac_method

private

◆ microp_uniform

logical micro_mg1_5::microp_uniform

private

◆ mindbz

real(r8), parameter micro_mg1_5::mindbz = -99._r8

private

◆ minrefl

real(r8), parameter micro_mg1_5::minrefl = 1.26e-10_r8

private

◆ nccons

logical, parameter, public micro_mg1_5::nccons = .false.

◆ ncnst

real(r8), parameter micro_mg1_5::ncnst = 100.e6_r8

private

◆ nicons

logical, parameter, public micro_mg1_5::nicons = .false.

◆ ninst

real(r8), parameter micro_mg1_5::ninst = 0.1e6_r8

private

◆ omsm

real(r8), parameter micro_mg1_5::omsm = 0.99999_r8

private

◆ pi

real(r8), parameter micro_mg1_5::pi = 3.14159265358979323846_r8

private

◆ qsmall

real(r8), parameter micro_mg1_5::qsmall = 1.e-18_r8

private

◆ r

real(r8) micro_mg1_5::r

private

◆ r8

integer, parameter micro_mg1_5::r8 = selected_real_kind(12)

private

◆ rainfrze

real(r8) micro_mg1_5::rainfrze

private

◆ rhmini

real(r8) micro_mg1_5::rhmini

private

◆ rhoi

real(r8), parameter micro_mg1_5::rhoi = 500._r8

private

◆ rhosn

real(r8), parameter micro_mg1_5::rhosn = 250._r8

private

◆ rhosu

real(r8) micro_mg1_5::rhosu

private

◆ rhow

real(r8), parameter micro_mg1_5::rhow = 1000._r8

private

◆ rv

real(r8) micro_mg1_5::rv

private

◆ snowmelt

real(r8) micro_mg1_5::snowmelt

private

◆ tmelt

real(r8) micro_mg1_5::tmelt

private

◆ use_hetfrz_classnuc

logical micro_mg1_5::use_hetfrz_classnuc

private

◆ xlf

real(r8) micro_mg1_5::xlf

private

◆ xxls

real(r8) micro_mg1_5::xxls

private

◆ xxlv

real(r8) micro_mg1_5::xxlv

private

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ accrete_cloud_ice_snow()

◆ accrete_cloud_water_rain()

◆ accrete_cloud_water_snow()

◆ accrete_rain_snow()

◆ avg_diameter()

◆ bergeron_process_snow()

◆ calc_ab()

◆ calc_rercld()

◆ contact_freezing()

◆ evaporate_sublimate_precip()

◆ get_dcst()

◆ heterogeneous_rain_freezing()

◆ ice_autoconversion()

◆ ice_deposition_sublimation()

◆ immersion_freezing()

◆ interp_to_mid()

◆ kk2000_liq_autoconversion()

◆ micro_mg_get_cols()

◆ micro_mg_init()

◆ micro_mg_tend()

◆ secondary_ice_production()

◆ self_collection_rain()

◆ size_dist_param_ice()

◆ size_dist_param_liq()

◆ size_dist_param_rain()

◆ size_dist_param_snow()

◆ snow_self_aggregation()

◆ var_coef()

Variable Documentation

◆ ac

◆ ai

◆ aimm

◆ ar

◆ as

◆ bc

◆ bi

◆ bimm

◆ br

◆ bs

◆ cons1

◆ cons11

◆ cons13

◆ cons14

◆ cons16

◆ cons17

◆ cons22

◆ cons23

◆ cons24

◆ cons25

◆ cons27

◆ cons28

◆ cons4

◆ cons5

◆ cons7

◆ cons8

◆ cpp

◆ csmax

◆ csmin

◆ dcs

◆ dcs_tdep

◆ do_cldice

◆ dsph

◆ eii

◆ f1r

◆ f1s

◆ f2r

◆ f2s

◆ g

◆ icenuct

◆ icsmall

◆ mi0

◆ mi0l_min

◆ micro_mg_berg_eff_factor

◆ micro_mg_precip_frac_method

◆ microp_uniform

◆ mindbz

◆ minrefl