Data Types
type	misc_vars_aa_type

Functions/Subroutines
subroutine, public	modal_aero_amicphys_intr (mdo_gasaerexch, mdo_rename, mdo_newnuc, mdo_coag, lchnk, ncol, nstep, loffset, deltat, latndx, lonndx, t, pmid, pdel, zm, pblh, qv, cld, q, qqcw, q_pregaschem, q_precldchem, qqcw_precldchem, dgncur_a, dgncur_awet, wetdens_host, qaerwat)

subroutine	mam_amicphys_1gridcell (do_cond, do_rename, do_newnuc, do_coag, nstep, lchnk, i, k, latndx, lonndx, lund, loffset, deltat, nsubarea, ncldy_subarea, iscldy_subarea, afracsub, temp, pmid, pdel, zmid, pblh, relhumsub, dgn_a, dgn_awet, wetdens, qsub1, qsub2, qqcwsub2, qsub3, qqcwsub3, qaerwatsub3, qsub4, qqcwsub4, qaerwatsub4, qsub_tendaa, qqcwsub_tendaa, misc_vars_aa)

subroutine	mam_amicphys_1subarea_cloudy (do_cond, do_rename, do_newnuc, do_coag, nstep, lchnk, i, k, latndx, lonndx, lund, loffset, deltat, jsub, nsubarea, iscldy_subarea, afracsub, temp, pmid, pdel, zmid, pblh, relhum, dgn_a, dgn_awet, wetdens, qgas1, qgas3, qgas4, qgas_delaa, qnum3, qnum4, qnum_delaa, qaer2, qaer3, qaer4, qaer_delaa, qwtr3, qwtr4, qnumcw3, qnumcw4, qnumcw_delaa, qaercw2, qaercw3, qaercw4, qaercw_delaa, misc_vars_aa_sub)

subroutine	mam_amicphys_1subarea_clear (do_cond, do_rename, do_newnuc, do_coag, nstep, lchnk, i, k, latndx, lonndx, lund, loffset, deltat, jsub, nsubarea, iscldy_subarea, afracsub, temp, pmid, pdel, zmid, pblh, relhum, dgn_a, dgn_awet, wetdens, qgas1, qgas3, qgas4, qgas_delaa, qnum3, qnum4, qnum_delaa, qaer3, qaer4, qaer_delaa, qwtr3, qwtr4, misc_vars_aa_sub)

subroutine	mam_gasaerexch_1subarea (nstep, lchnk, i, k, jsub, jtsubstep, ntsubstep, latndx, lonndx, lund, dtsubstep, temp, pmid, aircon, n_mode, qgas_cur, qgas_avg, qgas_netprod_otrproc, qaer_cur, qnum_cur, qwtr_cur, dgn_a, dgn_awet, wetdens, uptkaer, uptkrate_h2so4)

subroutine	mam_soaexch_1subarea (nstep, lchnk, i, k, jsub, latndx, lonndx, lund, dtsubstep, temp, pmid, aircon, n_mode, qgas_cur, qgas_avg, qaer_cur, qnum_cur, qwtr_cur, uptkaer)

subroutine	mam_rename_1subarea (nstep, lchnk, i, k, jsub, latndx, lonndx, lund, iscldy_subarea, mtoo_renamexf, n_mode, qnum_cur, qaer_cur, qaer_del_grow4rnam, qwtr_cur, qnumcw_cur, qaercw_cur, qaercw_del_grow4rnam)

subroutine	mam_newnuc_1subarea (nstep, lchnk, i, k, jsub, latndx, lonndx, lund, deltat, temp, pmid, aircon, zmid, pblh, relhum, uptkrate_h2so4, del_h2so4_gasprod, del_h2so4_aeruptk, n_mode, qgas_cur, qgas_avg, qnum_cur, qaer_cur, qwtr_cur, dnclusterdt)

subroutine	mam_coag_1subarea (nstep, lchnk, i, k, jsub, latndx, lonndx, lund, deltat, temp, pmid, aircon, dgn_a, dgn_awet, wetdens, n_mode, qnum_cur, qaer_cur, qaer_del_coag_in, qwtr_cur)

subroutine	mam_pcarbon_aging_1subarea (nstep, lchnk, i, k, jsub, latndx, lonndx, lund, deltat, dgn_a, do_cond, n_mode, qnum_cur, qnum_del_cond, qnum_del_coag, qaer_cur, qaer_del_cond, qaer_del_coag, qaer_del_coag_in, qwtr_cur)

real(8) function	mean_molecular_speed (temp, rmw)

real(8) function	gas_diffusivity (t_k, p_atm, rmw, vm)

subroutine	gas_aer_uptkrates_1box1gas (accom, gasdiffus, gasfreepath, beta_inp, n_mode, dgncur_awet, lnsg, uptkrate)

subroutine, public	modal_aero_amicphys_init (imozart, species_class, n_so4_monolayers_pcage_in)

subroutine	mam_set_lptr2_and_specxxx2

subroutine	m_a_amicphys_init_history (loffset)

Variables
logical, public	mosaic = .true.

integer, parameter	pcnstxx = gas_pcnst

real(r8), public, protected	n_so4_monolayers_pcage = huge(1.0_r8)

real(r8), public, protected	dr_so4_monolayers_pcage = huge(1.0_r8)

integer, public	mdo_gaexch_cldy_subarea = 0

integer, public	gaexch_h2so4_uptake_optaa = 2

integer, public	newnuc_h2so4_conc_optaa = 2

integer, public	rename_method_optaa = 40

integer, public	update_qaerwat = 0

integer, public	update_dgncur_a = 0

integer, public	update_dgncur_awet = 0

real(r8)	newnuc_adjust_factor_dnaitdt = 1.0_r8

real(r8)	newnuc_adjust_factor_pbl = 1.0_r8

integer, parameter	max_gas = nsoa + 1

integer, parameter	max_aer = nsoa + npoa + nbc + 4

integer, parameter	ntot_amode_extd = ntot_amode

integer, parameter	max_mode_fresh = 1

integer, parameter, public	max_mode = ntot_amode_extd + max_mode_fresh

integer, parameter	max_coagpair = 100

integer, parameter	max_agepair = 1

integer, parameter	maxsubarea = 2

integer, parameter	nqtendaa = 4

integer, parameter	iqtend_cond = 1

integer, parameter	iqtend_rnam = 2

integer, parameter	iqtend_nnuc = 3

integer, parameter	iqtend_coag = 4

integer, parameter	nqqcwtendaa = 1

integer, parameter	iqqcwtend_rnam = 1

integer, dimension(nqtendaa), parameter	iqqcwtend_match_iqtend = (/ 0, iqqcwtend_rnam, 0, 0 /)

logical, parameter	aging_include_seasalt = .false.

integer	igas_soa

integer	igas_h2so4

integer	igas_nh3

integer	igas_hno3

integer	igas_hcl

integer	iaer_bc

integer	iaer_dst

integer	iaer_ncl

integer	iaer_nh4

integer	iaer_pom

integer	iaer_soa

integer	iaer_so4

integer	iaer_mpoly

integer	iaer_mprot

integer	iaer_mlip

integer	iaer_mhum

integer	iaer_mproc

integer	iaer_mom

integer	iaer_no3

integer	iaer_cl

integer	iaer_ca

integer	iaer_co3

integer	i_agepair_pca

integer	i_agepair_macc

integer	i_agepair_mait

integer, dimension(max_gas)	lmap_gas

integer, dimension(max_aer, max_mode)	lmap_aer

integer, dimension(max_aer, max_mode)	lmapbb_aer

integer, dimension(max_aer, max_mode)	lmap_aercw

integer, dimension(max_mode)	lmap_num

integer, dimension(max_mode)	lmap_numcw

integer, dimension(gas_pcnst)	lmapcc_all

integer, parameter	lmapcc_val_gas = 1

integer, parameter	lmapcc_val_aer = 2

integer, parameter	lmapcc_val_num = 3

integer	ngas

integer	naer

integer	nacc

integer	nait

integer	npca

integer	nufi

integer	nmacc

integer	nmait

integer	n_agepair

integer	n_coagpair

integer, dimension(max_agepair)	modefrm_agepair

integer, dimension(max_agepair)	modetoo_agepair

integer, dimension(max_mode)	mode_aging_optaa

integer, dimension(max_coagpair)	modefrm_coagpair

integer, dimension(max_coagpair)	modetoo_coagpair

integer, dimension(max_coagpair)	modeend_coagpair

integer	lun82

integer	lun97

integer	lun98

integer	lun13n

integer	lun15n

logical	ldiag82

logical	ldiag97

logical	ldiag98

logical	ldiag13n

logical	ldiag15n

logical	ldiagd1

real(r8), dimension(max_gas)	accom_coef_gas

real(r8), dimension(max_mode)	alnsg_aer

real(r8), dimension(max_mode)	dgnum_aer

real(r8), dimension(max_mode)	dgnumhi_aer

real(r8), dimension(max_mode)	dgnumlo_aer

real(r8), dimension(max_aer)	dens_aer

real(r8)	dens_so4a_host

real(r8), dimension(max_aer)	fac_m2v_aer

real(r8), dimension(max_aer)	fac_eqvso4hyg_aer

real(r8), dimension(max_aer)	fac_m2v_eqvhyg_aer

real(r8), dimension(max_gas)	fcvt_gas

real(r8), dimension(max_aer)	fcvt_aer

real(r8)	fcvt_num

real(r8)	fcvt_wtr

real(r8), dimension(max_mode)	fcvt_dgnum_dvolmean

real(r8), dimension(max_aer)	hygro_aer

real(r8), dimension(max_gas)	mw_gas

real(r8), dimension(max_aer)	mw_aer

real(r8), dimension(max_gas)	mwhost_gas

real(r8), dimension(max_aer)	mwhost_aer

real(r8)	mwhost_num

real(r8)	mw_nh4a_host

real(r8)	mw_so4a_host

real(r8), dimension(nsoa)	mwuse_soa

real(r8), dimension(npoa)	mwuse_poa

real(r8), dimension(max_mode)	sigmag_aer

real(r8), dimension(max_gas)	vol_molar_gas

character(len=16), dimension(max_gas)	name_gas

character(len=16), dimension(max_aer)	name_aerpfx

character(len=16), dimension(max_aer, max_mode)	name_aer

character(len=16), dimension(max_aer, max_mode)	name_aercw

character(len=16), dimension(max_mode)	name_num

character(len=16), dimension(max_mode)	name_numcw

character(len=8), dimension(nqtendaa)	suffix_q_coltendaa = (/ '_sfgaex1', '_sfgaex2', '_sfnnuc1', '_sfcoag1' /)

character(len=8), dimension(nqqcwtendaa)	suffix_qqcw_coltendaa = '_sfgaex2'

logical, dimension(gas_pcnst, nqtendaa)	do_q_coltendaa = .false.

logical, dimension(gas_pcnst, nqqcwtendaa)	do_qqcw_coltendaa = .false.

real(r8), dimension(ntot_aspectype, ntot_amode)	specmw2_amode

real(r8), dimension(ntot_aspectype, ntot_amode)	specdens2_amode

real(r8), dimension(ntot_aspectype, ntot_amode)	spechygro2

Function/Subroutine Documentation

◆ gas_aer_uptkrates_1box1gas()

subroutine modal_aero_amicphys::gas_aer_uptkrates_1box1gas	(	real(r8), intent(in)	accom,
		real(r8), intent(in)	gasdiffus,
		real(r8), intent(in)	gasfreepath,
		real(r8), intent(in)	beta_inp,
		integer, intent(in)	n_mode,
		real(r8), dimension(n_mode), intent(in)	dgncur_awet,
		real(r8), dimension(n_mode), intent(in)	lnsg,
		real(r8), dimension(n_mode), intent(out)	uptkrate
	)

private

Here is the caller graph for this function:

◆ gas_diffusivity()

real(8) function modal_aero_amicphys::gas_diffusivity	(	real(8)	t_k,
		real(8)	p_atm,
		real(8)	rmw,
		real(8)	vm
	)

private

Here is the caller graph for this function:

◆ m_a_amicphys_init_history()

subroutine modal_aero_amicphys::m_a_amicphys_init_history ( integer, intent(in) loffset )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_amicphys_1gridcell()

subroutine modal_aero_amicphys::mam_amicphys_1gridcell	(	logical, intent(in)	do_cond,
		logical, intent(in)	do_rename,
		logical, intent(in)	do_newnuc,
		logical, intent(in)	do_coag,
		integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		integer, intent(in)	loffset,
		real(r8), intent(in)	deltat,
		integer, intent(in)	nsubarea,
		integer, intent(in)	ncldy_subarea,
		logical, dimension(maxsubarea), intent(in)	iscldy_subarea,
		real(r8), dimension(maxsubarea), intent(in)	afracsub,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	pdel,
		real(r8), intent(in)	zmid,
		real(r8), intent(in)	pblh,
		real(r8), dimension(maxsubarea), intent(in)	relhumsub,
		real(r8), dimension(max_mode), intent(inout)	dgn_a,
		real(r8), dimension(max_mode), intent(inout)	dgn_awet,
		real(r8), dimension(max_mode), intent(inout)	wetdens,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(in)	qsub1,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(in)	qsub2,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(in)	qqcwsub2,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(in)	qsub3,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(in)	qqcwsub3,
		real(r8), dimension( 1:ntot_amode_extd, 1:maxsubarea ), intent(inout)	qaerwatsub3,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(inout)	qsub4,
		real(r8), dimension( 1:gas_pcnst, 1:maxsubarea ), intent(inout)	qqcwsub4,
		real(r8), dimension( 1:ntot_amode_extd, 1:maxsubarea ), intent(inout)	qaerwatsub4,
		real(r8), dimension( 1:gas_pcnst, 1:nqtendaa, 1:maxsubarea ), intent(inout)	qsub_tendaa,
		real(r8), dimension( 1:gas_pcnst, 1:nqqcwtendaa, 1:maxsubarea ), intent(inout)	qqcwsub_tendaa,
		type ( misc_vars_aa_type ), intent(inout)	misc_vars_aa
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_amicphys_1subarea_clear()

subroutine modal_aero_amicphys::mam_amicphys_1subarea_clear	(	logical, intent(in)	do_cond,
		logical, intent(in)	do_rename,
		logical, intent(in)	do_newnuc,
		logical, intent(in)	do_coag,
		integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		integer, intent(in)	loffset,
		real(r8), intent(in)	deltat,
		integer, intent(in)	jsub,
		integer, intent(in)	nsubarea,
		logical, intent(in)	iscldy_subarea,
		real(r8), intent(in)	afracsub,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	pdel,
		real(r8), intent(in)	zmid,
		real(r8), intent(in)	pblh,
		real(r8), intent(in)	relhum,
		real(r8), dimension(max_mode), intent(inout)	dgn_a,
		real(r8), dimension(max_mode), intent(inout)	dgn_awet,
		real(r8), dimension(max_mode), intent(inout)	wetdens,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas1,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas3,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas4,
		real(r8), dimension( 1:max_gas, 1:nqtendaa ), intent(inout)	qgas_delaa,
		real(r8), dimension( 1:max_mode ), intent(in)	qnum3,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum4,
		real(r8), dimension( 1:max_mode, 1:nqtendaa ), intent(inout)	qnum_delaa,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaer3,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer4,
		real(r8), dimension( 1:max_aer, 1:max_mode, 1:nqtendaa ), intent(inout)	qaer_delaa,
		real(r8), dimension( 1:max_mode ), intent(in)	qwtr3,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr4,
		type ( misc_vars_aa_type ), intent(inout)	misc_vars_aa_sub
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_amicphys_1subarea_cloudy()

subroutine modal_aero_amicphys::mam_amicphys_1subarea_cloudy	(	logical, intent(in)	do_cond,
		logical, intent(in)	do_rename,
		logical, intent(in)	do_newnuc,
		logical, intent(in)	do_coag,
		integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		integer, intent(in)	loffset,
		real(r8), intent(in)	deltat,
		integer, intent(in)	jsub,
		integer, intent(in)	nsubarea,
		logical, intent(in)	iscldy_subarea,
		real(r8), intent(in)	afracsub,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	pdel,
		real(r8), intent(in)	zmid,
		real(r8), intent(in)	pblh,
		real(r8), intent(in)	relhum,
		real(r8), dimension(max_mode), intent(inout)	dgn_a,
		real(r8), dimension(max_mode), intent(inout)	dgn_awet,
		real(r8), dimension(max_mode), intent(inout)	wetdens,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas1,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas3,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas4,
		real(r8), dimension( 1:max_gas, 1:nqtendaa ), intent(inout)	qgas_delaa,
		real(r8), dimension( 1:max_mode ), intent(in)	qnum3,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum4,
		real(r8), dimension( 1:max_mode, 1:nqtendaa ), intent(inout)	qnum_delaa,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaer2,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaer3,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer4,
		real(r8), dimension( 1:max_aer, 1:max_mode, 1:nqtendaa ), intent(inout)	qaer_delaa,
		real(r8), dimension( 1:max_mode ), intent(in)	qwtr3,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr4,
		real(r8), dimension( 1:max_mode ), intent(in)	qnumcw3,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnumcw4,
		real(r8), dimension( 1:max_mode, 1:nqqcwtendaa ), intent(inout)	qnumcw_delaa,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaercw2,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaercw3,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaercw4,
		real(r8), dimension( 1:max_aer, 1:max_mode, 1:nqqcwtendaa ), intent(inout)	qaercw_delaa,
		type ( misc_vars_aa_type ), intent(inout)	misc_vars_aa_sub
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_coag_1subarea()

subroutine modal_aero_amicphys::mam_coag_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		real(r8), intent(in)	deltat,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	aircon,
		real(r8), dimension(max_mode), intent(in)	dgn_a,
		real(r8), dimension(max_mode), intent(in)	dgn_awet,
		real(r8), dimension(max_mode), intent(in)	wetdens,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_aer, 1:max_agepair ), intent(out)	qaer_del_coag_in,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_gasaerexch_1subarea()

subroutine modal_aero_amicphys::mam_gasaerexch_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	jtsubstep,
		integer, intent(in)	ntsubstep,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		real(r8), intent(in)	dtsubstep,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	aircon,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas_cur,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas_avg,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas_netprod_otrproc,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	dgn_a,
		real(r8), dimension( 1:max_mode ), intent(inout)	dgn_awet,
		real(r8), dimension( 1:max_mode ), intent(inout)	wetdens,
		real(r8), dimension( 1:max_gas, 1:max_mode ), intent(inout)	uptkaer,
		real(r8), intent(inout)	uptkrate_h2so4
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_newnuc_1subarea()

subroutine modal_aero_amicphys::mam_newnuc_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		real(r8), intent(in)	deltat,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	aircon,
		real(r8), intent(in)	zmid,
		real(r8), intent(in)	pblh,
		real(r8), intent(in)	relhum,
		real(r8), intent(in)	uptkrate_h2so4,
		real(r8), intent(in)	del_h2so4_gasprod,
		real(r8), intent(in)	del_h2so4_aeruptk,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas_cur,
		real(r8), dimension( 1:max_gas ), intent(in)	qgas_avg,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur,
		real(r8), intent(inout)	dnclusterdt
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_pcarbon_aging_1subarea()

subroutine modal_aero_amicphys::mam_pcarbon_aging_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		real(r8), intent(in)	deltat,
		real(r8), dimension( 1:max_mode ), intent(in)	dgn_a,
		logical, intent(in)	do_cond,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_del_cond,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_del_coag,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_del_cond,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_del_coag,
		real(r8), dimension( 1:max_aer, 1:max_agepair ), intent(inout)	qaer_del_coag_in,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur
	)

Here is the caller graph for this function:

◆ mam_rename_1subarea()

subroutine modal_aero_amicphys::mam_rename_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		logical, intent(in)	iscldy_subarea,
		integer, dimension(max_mode), intent(in)	mtoo_renamexf,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in)	qaer_del_grow4rnam,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur,
		real(r8), dimension( 1:max_mode ), intent(inout), optional	qnumcw_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout), optional	qaercw_cur,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(in), optional	qaercw_del_grow4rnam
	)

Here is the caller graph for this function:

◆ mam_set_lptr2_and_specxxx2()

subroutine modal_aero_amicphys::mam_set_lptr2_and_specxxx2 ( )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ mam_soaexch_1subarea()

subroutine modal_aero_amicphys::mam_soaexch_1subarea	(	integer, intent(in)	nstep,
		integer, intent(in)	lchnk,
		integer, intent(in)	i,
		integer, intent(in)	k,
		integer, intent(in)	jsub,
		integer, intent(in)	latndx,
		integer, intent(in)	lonndx,
		integer, intent(in)	lund,
		real(r8), intent(in)	dtsubstep,
		real(r8), intent(in)	temp,
		real(r8), intent(in)	pmid,
		real(r8), intent(in)	aircon,
		integer, intent(in)	n_mode,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas_cur,
		real(r8), dimension( 1:max_gas ), intent(inout)	qgas_avg,
		real(r8), dimension( 1:max_aer, 1:max_mode ), intent(inout)	qaer_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qnum_cur,
		real(r8), dimension( 1:max_mode ), intent(inout)	qwtr_cur,
		real(r8), dimension( 1:max_gas, 1:max_mode ), intent(in)	uptkaer
	)

private

Here is the caller graph for this function:

◆ mean_molecular_speed()

real(8) function modal_aero_amicphys::mean_molecular_speed	(	real(8)	temp,
		real(8)	rmw
	)

private

Here is the caller graph for this function:

◆ modal_aero_amicphys_init()

subroutine, public modal_aero_amicphys::modal_aero_amicphys_init	(	integer, intent(in)	imozart,
		integer, dimension(:), intent(in)	species_class,
		real(r8), intent(in)	n_so4_monolayers_pcage_in
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ modal_aero_amicphys_intr()

subroutine, public modal_aero_amicphys::modal_aero_amicphys_intr	(	integer, intent(in)	mdo_gasaerexch,
		integer, intent(in)	mdo_rename,
		integer, intent(in)	mdo_newnuc,
		integer, intent(in)	mdo_coag,
		integer, intent(in)	lchnk,
		integer, intent(in)	ncol,
		integer, intent(in)	nstep,
		integer, intent(in)	loffset,
		real(r8), intent(in)	deltat,
		integer, dimension(pcols), intent(in)	latndx,
		integer, dimension(pcols), intent(in)	lonndx,
		real(r8), dimension(pcols,pver), intent(in)	t,
		real(r8), dimension(pcols,pver), intent(in)	pmid,
		real(r8), dimension(pcols,pver), intent(in)	pdel,
		real(r8), dimension(pcols,pver), intent(in)	zm,
		real(r8), dimension(pcols), intent(in)	pblh,
		real(r8), dimension(pcols,pver), intent(in)	qv,
		real(r8), dimension(ncol,pver), intent(in)	cld,
		real(r8), dimension(ncol,pver,pcnstxx), intent(inout)	q,
		real(r8), dimension(ncol,pver,pcnstxx), intent(inout)	qqcw,
		real(r8), dimension(ncol,pver,pcnstxx), intent(in)	q_pregaschem,
		real(r8), dimension(ncol,pver,pcnstxx), intent(in)	q_precldchem,
		real(r8), dimension(ncol,pver,pcnstxx), intent(in)	qqcw_precldchem,
		real(r8), dimension(pcols,pver,ntot_amode), intent(inout)	dgncur_a,
		real(r8), dimension(pcols,pver,ntot_amode), intent(inout)	dgncur_awet,
		real(r8), dimension(pcols,pver,ntot_amode), intent(inout)	wetdens_host,
		real(r8), dimension(pcols,pver,ntot_amode), intent(inout), optional	qaerwat
	)

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

◆ accom_coef_gas

real(r8), dimension(max_gas) modal_aero_amicphys::accom_coef_gas

private

◆ aging_include_seasalt

logical, parameter modal_aero_amicphys::aging_include_seasalt = .false.

private

◆ alnsg_aer

real(r8), dimension(max_mode) modal_aero_amicphys::alnsg_aer

private

◆ dens_aer

real(r8), dimension(max_aer) modal_aero_amicphys::dens_aer

private

◆ dens_so4a_host

real(r8) modal_aero_amicphys::dens_so4a_host

private

◆ dgnum_aer

real(r8), dimension(max_mode) modal_aero_amicphys::dgnum_aer

private

◆ dgnumhi_aer

real(r8), dimension(max_mode) modal_aero_amicphys::dgnumhi_aer

private

◆ dgnumlo_aer

real(r8), dimension(max_mode) modal_aero_amicphys::dgnumlo_aer

private

◆ do_q_coltendaa

logical, dimension(gas_pcnst,nqtendaa) modal_aero_amicphys::do_q_coltendaa = .false.

private

◆ do_qqcw_coltendaa

logical, dimension(gas_pcnst,nqqcwtendaa) modal_aero_amicphys::do_qqcw_coltendaa = .false.

private

◆ dr_so4_monolayers_pcage

real(r8), public, protected modal_aero_amicphys::dr_so4_monolayers_pcage = huge(1.0_r8)

◆ fac_eqvso4hyg_aer

real(r8), dimension(max_aer) modal_aero_amicphys::fac_eqvso4hyg_aer

private

◆ fac_m2v_aer

real(r8), dimension(max_aer) modal_aero_amicphys::fac_m2v_aer

private

◆ fac_m2v_eqvhyg_aer

real(r8), dimension(max_aer) modal_aero_amicphys::fac_m2v_eqvhyg_aer

private

◆ fcvt_aer

real(r8), dimension(max_aer) modal_aero_amicphys::fcvt_aer

private

◆ fcvt_dgnum_dvolmean

real(r8), dimension(max_mode) modal_aero_amicphys::fcvt_dgnum_dvolmean

private

◆ fcvt_gas

real(r8), dimension(max_gas) modal_aero_amicphys::fcvt_gas

private

◆ fcvt_num

real(r8) modal_aero_amicphys::fcvt_num

private

◆ fcvt_wtr

real(r8) modal_aero_amicphys::fcvt_wtr

private

◆ gaexch_h2so4_uptake_optaa

integer, public modal_aero_amicphys::gaexch_h2so4_uptake_optaa = 2

◆ hygro_aer

real(r8), dimension(max_aer) modal_aero_amicphys::hygro_aer

private

◆ i_agepair_macc

integer modal_aero_amicphys::i_agepair_macc

private

◆ i_agepair_mait

integer modal_aero_amicphys::i_agepair_mait

private

◆ i_agepair_pca

integer modal_aero_amicphys::i_agepair_pca

private

◆ iaer_bc

integer modal_aero_amicphys::iaer_bc

private

◆ iaer_ca

integer modal_aero_amicphys::iaer_ca

private

◆ iaer_cl

integer modal_aero_amicphys::iaer_cl

private

◆ iaer_co3

integer modal_aero_amicphys::iaer_co3

private

◆ iaer_dst

integer modal_aero_amicphys::iaer_dst

private

◆ iaer_mhum

integer modal_aero_amicphys::iaer_mhum

private

◆ iaer_mlip

integer modal_aero_amicphys::iaer_mlip

private

◆ iaer_mom

integer modal_aero_amicphys::iaer_mom

private

◆ iaer_mpoly

integer modal_aero_amicphys::iaer_mpoly

private

◆ iaer_mproc

integer modal_aero_amicphys::iaer_mproc

private

◆ iaer_mprot

integer modal_aero_amicphys::iaer_mprot

private

◆ iaer_ncl

integer modal_aero_amicphys::iaer_ncl

private

◆ iaer_nh4

integer modal_aero_amicphys::iaer_nh4

private

◆ iaer_no3

integer modal_aero_amicphys::iaer_no3

private

◆ iaer_pom

integer modal_aero_amicphys::iaer_pom

private

◆ iaer_so4

integer modal_aero_amicphys::iaer_so4

private

◆ iaer_soa

integer modal_aero_amicphys::iaer_soa

private

◆ igas_h2so4

integer modal_aero_amicphys::igas_h2so4

private

◆ igas_hcl

integer modal_aero_amicphys::igas_hcl

private

◆ igas_hno3

integer modal_aero_amicphys::igas_hno3

private

◆ igas_nh3

integer modal_aero_amicphys::igas_nh3

private

◆ igas_soa

integer modal_aero_amicphys::igas_soa

private

◆ iqqcwtend_match_iqtend

integer, dimension(nqtendaa), parameter modal_aero_amicphys::iqqcwtend_match_iqtend = (/ 0, iqqcwtend_rnam, 0, 0 /)

private

◆ iqqcwtend_rnam

integer, parameter modal_aero_amicphys::iqqcwtend_rnam = 1

private

◆ iqtend_coag

integer, parameter modal_aero_amicphys::iqtend_coag = 4

private

◆ iqtend_cond

integer, parameter modal_aero_amicphys::iqtend_cond = 1

private

◆ iqtend_nnuc

integer, parameter modal_aero_amicphys::iqtend_nnuc = 3

private

◆ iqtend_rnam

integer, parameter modal_aero_amicphys::iqtend_rnam = 2

private

◆ ldiag13n

logical modal_aero_amicphys::ldiag13n

private

◆ ldiag15n

logical modal_aero_amicphys::ldiag15n

private

◆ ldiag82

logical modal_aero_amicphys::ldiag82

private

◆ ldiag97

logical modal_aero_amicphys::ldiag97

private

◆ ldiag98

logical modal_aero_amicphys::ldiag98

private

◆ ldiagd1

logical modal_aero_amicphys::ldiagd1

private

◆ lmap_aer

integer, dimension(max_aer,max_mode) modal_aero_amicphys::lmap_aer

private

◆ lmap_aercw

integer, dimension(max_aer,max_mode) modal_aero_amicphys::lmap_aercw

private

◆ lmap_gas

integer, dimension(max_gas) modal_aero_amicphys::lmap_gas

private

◆ lmap_num

integer, dimension(max_mode) modal_aero_amicphys::lmap_num

private

◆ lmap_numcw

integer, dimension(max_mode) modal_aero_amicphys::lmap_numcw

private

◆ lmapbb_aer

integer, dimension(max_aer,max_mode) modal_aero_amicphys::lmapbb_aer

private

◆ lmapcc_all

integer, dimension(gas_pcnst) modal_aero_amicphys::lmapcc_all

private

◆ lmapcc_val_aer

integer, parameter modal_aero_amicphys::lmapcc_val_aer = 2

private

◆ lmapcc_val_gas

integer, parameter modal_aero_amicphys::lmapcc_val_gas = 1

private

◆ lmapcc_val_num

integer, parameter modal_aero_amicphys::lmapcc_val_num = 3

private

◆ lun13n

integer modal_aero_amicphys::lun13n

private

◆ lun15n

integer modal_aero_amicphys::lun15n

private

◆ lun82

integer modal_aero_amicphys::lun82

private

◆ lun97

integer modal_aero_amicphys::lun97

private

◆ lun98

integer modal_aero_amicphys::lun98

private

◆ max_aer

integer, parameter modal_aero_amicphys::max_aer = nsoa + npoa + nbc + 4

private

◆ max_agepair

integer, parameter modal_aero_amicphys::max_agepair = 1

private

◆ max_coagpair

integer, parameter modal_aero_amicphys::max_coagpair = 100

private

◆ max_gas

integer, parameter modal_aero_amicphys::max_gas = nsoa + 1

private

◆ max_mode

integer, parameter, public modal_aero_amicphys::max_mode = ntot_amode_extd + max_mode_fresh

◆ max_mode_fresh

integer, parameter modal_aero_amicphys::max_mode_fresh = 1

private

◆ maxsubarea

integer, parameter modal_aero_amicphys::maxsubarea = 2

private

◆ mdo_gaexch_cldy_subarea

integer, public modal_aero_amicphys::mdo_gaexch_cldy_subarea = 0

◆ mode_aging_optaa

integer, dimension(max_mode) modal_aero_amicphys::mode_aging_optaa

private

◆ modeend_coagpair

integer, dimension(max_coagpair) modal_aero_amicphys::modeend_coagpair

private

◆ modefrm_agepair

integer, dimension(max_agepair) modal_aero_amicphys::modefrm_agepair

private

◆ modefrm_coagpair

integer, dimension(max_coagpair) modal_aero_amicphys::modefrm_coagpair

private

◆ modetoo_agepair

integer, dimension(max_agepair) modal_aero_amicphys::modetoo_agepair

private

◆ modetoo_coagpair

integer, dimension(max_coagpair) modal_aero_amicphys::modetoo_coagpair

private

◆ mosaic

logical, public modal_aero_amicphys::mosaic = .true.

◆ mw_aer

real(r8), dimension(max_aer) modal_aero_amicphys::mw_aer

private

◆ mw_gas

real(r8), dimension(max_gas) modal_aero_amicphys::mw_gas

private

◆ mw_nh4a_host

real(r8) modal_aero_amicphys::mw_nh4a_host

private

◆ mw_so4a_host

real(r8) modal_aero_amicphys::mw_so4a_host

private

◆ mwhost_aer

real(r8), dimension(max_aer) modal_aero_amicphys::mwhost_aer

private

◆ mwhost_gas

real(r8), dimension(max_gas) modal_aero_amicphys::mwhost_gas

private

◆ mwhost_num

real(r8) modal_aero_amicphys::mwhost_num

private

◆ mwuse_poa

real(r8), dimension(npoa) modal_aero_amicphys::mwuse_poa

private

◆ mwuse_soa

real(r8), dimension(nsoa) modal_aero_amicphys::mwuse_soa

private

◆ n_agepair

integer modal_aero_amicphys::n_agepair

private

◆ n_coagpair

integer modal_aero_amicphys::n_coagpair

private

◆ n_so4_monolayers_pcage

real(r8), public, protected modal_aero_amicphys::n_so4_monolayers_pcage = huge(1.0_r8)

◆ nacc

integer modal_aero_amicphys::nacc

private

◆ naer

integer modal_aero_amicphys::naer

private

◆ nait

integer modal_aero_amicphys::nait

private

◆ name_aer

character(len=16), dimension(max_aer,max_mode) modal_aero_amicphys::name_aer

private

◆ name_aercw

character(len=16), dimension(max_aer,max_mode) modal_aero_amicphys::name_aercw

private

◆ name_aerpfx

character(len=16), dimension(max_aer) modal_aero_amicphys::name_aerpfx

private

◆ name_gas

character(len=16), dimension(max_gas) modal_aero_amicphys::name_gas

private

◆ name_num

character(len=16), dimension(max_mode) modal_aero_amicphys::name_num

private

◆ name_numcw

character(len=16), dimension(max_mode) modal_aero_amicphys::name_numcw

private

◆ newnuc_adjust_factor_dnaitdt

real (r8) modal_aero_amicphys::newnuc_adjust_factor_dnaitdt = 1.0_r8

private

◆ newnuc_adjust_factor_pbl

real (r8) modal_aero_amicphys::newnuc_adjust_factor_pbl = 1.0_r8

private

◆ newnuc_h2so4_conc_optaa

integer, public modal_aero_amicphys::newnuc_h2so4_conc_optaa = 2

◆ ngas

integer modal_aero_amicphys::ngas

private

◆ nmacc

integer modal_aero_amicphys::nmacc

private

◆ nmait

integer modal_aero_amicphys::nmait

private

◆ npca

integer modal_aero_amicphys::npca

private

◆ nqqcwtendaa

integer, parameter modal_aero_amicphys::nqqcwtendaa = 1

private

◆ nqtendaa

integer, parameter modal_aero_amicphys::nqtendaa = 4

private

◆ ntot_amode_extd

integer, parameter modal_aero_amicphys::ntot_amode_extd = ntot_amode

private

◆ nufi

integer modal_aero_amicphys::nufi

private

◆ pcnstxx

integer, parameter modal_aero_amicphys::pcnstxx = gas_pcnst

private

◆ rename_method_optaa

integer, public modal_aero_amicphys::rename_method_optaa = 40

◆ sigmag_aer

real(r8), dimension(max_mode) modal_aero_amicphys::sigmag_aer

private

◆ specdens2_amode

real(r8), dimension(ntot_aspectype,ntot_amode) modal_aero_amicphys::specdens2_amode

private

◆ spechygro2

real(r8), dimension(ntot_aspectype,ntot_amode) modal_aero_amicphys::spechygro2

private

◆ specmw2_amode

real(r8), dimension(ntot_aspectype,ntot_amode) modal_aero_amicphys::specmw2_amode

private

◆ suffix_q_coltendaa

character(len=8), dimension(nqtendaa) modal_aero_amicphys::suffix_q_coltendaa = (/ '_sfgaex1', '_sfgaex2', '_sfnnuc1', '_sfcoag1' /)

private

◆ suffix_qqcw_coltendaa

character(len=8), dimension(nqqcwtendaa) modal_aero_amicphys::suffix_qqcw_coltendaa = '_sfgaex2'

private

◆ update_dgncur_a

integer, public modal_aero_amicphys::update_dgncur_a = 0

◆ update_dgncur_awet

integer, public modal_aero_amicphys::update_dgncur_awet = 0

◆ update_qaerwat

integer, public modal_aero_amicphys::update_qaerwat = 0

◆ vol_molar_gas

real(r8), dimension(max_gas) modal_aero_amicphys::vol_molar_gas

private

Data Types

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ gas_aer_uptkrates_1box1gas()

◆ gas_diffusivity()

◆ m_a_amicphys_init_history()

◆ mam_amicphys_1gridcell()

◆ mam_amicphys_1subarea_clear()

◆ mam_amicphys_1subarea_cloudy()

◆ mam_coag_1subarea()

◆ mam_gasaerexch_1subarea()

◆ mam_newnuc_1subarea()

◆ mam_pcarbon_aging_1subarea()

◆ mam_rename_1subarea()

◆ mam_set_lptr2_and_specxxx2()

◆ mam_soaexch_1subarea()

◆ mean_molecular_speed()

◆ modal_aero_amicphys_init()

◆ modal_aero_amicphys_intr()

Variable Documentation

◆ accom_coef_gas

◆ aging_include_seasalt

◆ alnsg_aer

◆ dens_aer

◆ dens_so4a_host

◆ dgnum_aer

◆ dgnumhi_aer

◆ dgnumlo_aer

◆ do_q_coltendaa

◆ do_qqcw_coltendaa

◆ dr_so4_monolayers_pcage

◆ fac_eqvso4hyg_aer

◆ fac_m2v_aer

◆ fac_m2v_eqvhyg_aer

◆ fcvt_aer

◆ fcvt_dgnum_dvolmean

◆ fcvt_gas

◆ fcvt_num

◆ fcvt_wtr

◆ gaexch_h2so4_uptake_optaa

◆ hygro_aer

◆ i_agepair_macc

◆ i_agepair_mait

◆ i_agepair_pca

◆ iaer_bc

◆ iaer_ca

◆ iaer_cl

◆ iaer_co3

◆ iaer_dst

◆ iaer_mhum

◆ iaer_mlip

◆ iaer_mom

◆ iaer_mpoly

◆ iaer_mproc

◆ iaer_mprot

◆ iaer_ncl

◆ iaer_nh4

◆ iaer_no3

◆ iaer_pom

◆ iaer_so4

◆ iaer_soa

◆ igas_h2so4

◆ igas_hcl

◆ igas_hno3

◆ igas_nh3

◆ igas_soa

◆ iqqcwtend_match_iqtend

◆ iqqcwtend_rnam

◆ iqtend_coag

◆ iqtend_cond

◆ iqtend_nnuc

◆ iqtend_rnam

◆ ldiag13n

◆ ldiag15n

◆ ldiag82

◆ ldiag97

◆ ldiag98

◆ ldiagd1

◆ lmap_aer