module_mp_tempo_params Module Reference

Functions/Subroutines
subroutine	get_version (version, verbose_flag)
subroutine	initialize_graupel_vars (hail_flag)
subroutine	initialize_parameters ()
subroutine	initialize_bins_for_tables ()
subroutine	initialize_bins_for_hail_size ()
subroutine	initialize_bins_for_radar ()
subroutine	create_bins (numbins, lowbin, highbin, bins, deltabins)
subroutine	initialize_arrays_freezewater (table_size)
subroutine	initialize_arrays_qr_acr_qs (table_size)
subroutine	initialize_arrays_qr_acr_qg (table_size)
subroutine	initialize_arrays_ccn (table_size)
subroutine	initialize_arrays_drop_evap ()
subroutine	initialize_array_efsw ()
subroutine	initialize_array_efrw ()
subroutine	initialize_arrays_qi_aut_qs ()

Variables
integer, parameter	dp = selected_real_kind(15, 307)
character(len=11)	tempo_version
integer, parameter	idx_bg1 = 6
real(wp), parameter	av_r = 4854._wp
real(wp), parameter	bv_r = 1.0_wp
real(wp), parameter	av_s = 40._wp
real(wp), parameter	bv_s = 0.55_wp
real(wp), parameter	fv_s = 100._wp
real(wp), parameter	bv_c = 2.0_wp
real(wp), parameter	bv_i = 1.0_wp
real(wp), parameter	av_g_old = 442._wp
real(wp), parameter	bv_g_old = 0.89_wp
real(wp), parameter	av_g_new = 161.794724_wp
real(wp), parameter	bv_g_new = 0.640961647_wp
real(wp), parameter	fv_r = 195.0_wp
real(wp), parameter	av_c = 0.316946e8_wp
real(wp), parameter	a_coeff = 0.47244157_wp
real(wp), parameter	b_coeff = 0.54698726_wp
real(wp), parameter	av_i = 1493.9
real(wp), parameter	am_s = 0.069_wp
real(wp), parameter	bm_s = 2.0_wp
real(wp), parameter	bm_g = 3.0_wp
real(wp), parameter	bm_i = 3.0_wp
real(wp), parameter	bm_r = 3.0_wp
real(wp), parameter	rho_i = 890._wp
real(wp), parameter	xm0i = 1.e-12_wp
real(wp), parameter	d0c = 1.e-6_wp
real(wp), parameter	d0r = 50.e-6_wp
real(wp), parameter	d0s = 300.e-6_wp
real(wp), parameter	d0g = 350.e-6_wp
real(wp), parameter	d0r_max = 2.5e-3_wp
real(wp), parameter	c_cube = 0.5_wp
real(wp), parameter	c_sqrd = 0.15_wp
real(wp), parameter	mu_r = 0.0_wp
real(wp), parameter	mu_s = 0.6357_wp
real(wp), parameter	mu_g = 0.0_wp
real(wp), parameter	mu_i = 0.0_wp
real(wp), parameter	nu_c_scale = 1000.e6_wp
integer, parameter	nu_c_max = 15
integer, parameter	nu_c_min = 2
real(wp), parameter	naccn0 = 300.0e6_wp
real(wp), parameter	naccn1 = 50.0e6_wp
real(wp), parameter	nain0 = 1.5e6_wp
real(wp), parameter	nain1 = 0.5e6_wp
real(wp), parameter	nwfa_default = 11.1e6_wp
real(wp), parameter	nifa_default = nain1*0.01_wp
real(wp), parameter	aero_max = 9999.e6_wp
real(wp), parameter	hgfrz = 235.16_wp
real(wp), parameter	nt_c_o = 50.e6_wp
real(wp), parameter	nt_c_l = 100.e6_wp
real(wp), parameter	nt_c_max = 1999.e6_wp
real(wp), parameter	nt_c_min = 2._wp
real(wp), parameter	tno = 5.0_wp
real(wp), parameter	ato = 0.304_wp
real(wp)	rho_s = 100.0_wp
real(wp), parameter	demott_nuc_ssati = 0.25_wp
real(wp), parameter	demott_nuc_tempc = -20._wp
real(wp), parameter	max_ni = 4999.e3_wp
real(wp), parameter	icenuc_max = 1000.e3_wp
real(wp), parameter	rime_threshold = 2.0_wp
real(wp), parameter	rime_conversion = 0.95_wp
real(wp), parameter	ef_si = 0.05_wp
real(wp), parameter	ef_rs = 0.95_wp
real(wp), parameter	ef_rg = 0.75_wp
real(wp), parameter	ef_ri = 0.95_wp
real(wp), parameter	autocon_nr_factor = 10._wp
real(wp), parameter	timestep_conversion_rime_to_rain = 120._wp
integer, parameter	table_sp = real32
integer, parameter	table_dp = real64
integer, parameter	nrhg = 9
integer, parameter	nrhg1 = 1
real(wp), parameter	min_qv = 1.e-10_wp
real(wp), parameter	r1 = 1.e-12_wp
real(wp), parameter	r2 = 1.e-6_wp
real(wp), parameter	low_limit_mass_for_precip = 1.e-9_wp
real(wp), parameter	eps = 1.e-15_wp
real(wp), parameter	meters3_to_liters = 1000._wp
real(dp), parameter	gonv_min = 1.e2_dp
real(dp), parameter	gonv_max = 1.e6_dp
real(wp), dimension(nrhg), parameter	rho_g = [50._wp, 100._wp, 200._wp, 300._wp, 400._wp, 500._wp, 600._wp, 700._wp, 800._wp]
real(wp), parameter	sc = 0.632_wp
real(wp), parameter	earth_gravity = 9.8_wp
real(wp)	pi = 3.1415926536_wp
real(wp)	t0 = 273.15_wp
real(wp)	rho_w = 1000._wp
real(wp)	lsub = 2.834e6_wp
real(wp)	lvap0 = 2.5e6_wp
real(wp)	rv = 461.5_wp
real(wp)	rdry = 287.04_wp
real(wp)	roverrv = 0.622_wp
real(wp)	cp = 1004.0_wp
real(wp)	r_uni = 8.314_wp
real(wp)	lfus
real(wp)	rho_not
real(wp)	rho_not0
real(wp), parameter	kap0 = 490.6_wp
real(wp), parameter	kap1 = 17.46_wp
real(wp), parameter	lam0 = 20.78_wp
real(wp), parameter	lam1 = 3.29_wp
integer, parameter	nbins = 100
integer, parameter	nbc = nbins
integer, parameter	nbr = nbins
integer, parameter	nbs = nbins
integer, parameter	nbi = nbins
integer, parameter	nbg = nbins
integer, parameter	ntb_i = 64
integer, parameter	ntb_i1 = 55
integer, parameter	ntb_c = 37
integer, parameter	ntb_t = 9
integer, parameter	ntb_g1 = 37
integer, parameter	ntb_s = 37
integer, parameter	ntb_g = 37
integer, parameter	ntb_r = 37
integer, parameter	ntb_r1 = 37
integer, parameter	ntb_t1 = 45
integer, parameter	ntb_in = 55
integer, parameter	ntb_arc = 7
integer, parameter	ntb_arw = 9
integer, parameter	ntb_art = 7
integer, parameter	ntb_arr = 5
integer, parameter	ntb_ark = 4
real(wp), dimension(ntb_c), parameter	r_c = [1.e-6_wp,2.e-6_wp,3.e-6_wp,4.e-6_wp,5.e-6_wp,6.e-6_wp,7.e-6_wp,8.e-6_wp,9.e-6_wp, 1.e-5_wp,2.e-5_wp,3.e-5_wp,4.e-5_wp,5.e-5_wp,6.e-5_wp,7.e-5_wp,8.e-5_wp,9.e-5_wp, 1.e-4_wp,2.e-4_wp,3.e-4_wp,4.e-4_wp,5.e-4_wp,6.e-4_wp,7.e-4_wp,8.e-4_wp,9.e-4_wp, 1.e-3_wp,2.e-3_wp,3.e-3_wp,4.e-3_wp,5.e-3_wp,6.e-3_wp,7.e-3_wp,8.e-3_wp,9.e-3_wp, 1.e-2_wp]
real(wp), dimension(ntb_i), parameter	r_i = [1.e-10_wp,2.e-10_wp,3.e-10_wp,4.e-10_wp, 5.e-10_wp,6.e-10_wp,7.e-10_wp,8.e-10_wp,9.e-10_wp, 1.e-9_wp,2.e-9_wp,3.e-9_wp,4.e-9_wp,5.e-9_wp,6.e-9_wp,7.e-9_wp,8.e-9_wp,9.e-9_wp, 1.e-8_wp,2.e-8_wp,3.e-8_wp,4.e-8_wp,5.e-8_wp,6.e-8_wp,7.e-8_wp,8.e-8_wp,9.e-8_wp, 1.e-7_wp,2.e-7_wp,3.e-7_wp,4.e-7_wp,5.e-7_wp,6.e-7_wp,7.e-7_wp,8.e-7_wp,9.e-7_wp, 1.e-6_wp,2.e-6_wp,3.e-6_wp,4.e-6_wp,5.e-6_wp,6.e-6_wp,7.e-6_wp,8.e-6_wp,9.e-6_wp, 1.e-5_wp,2.e-5_wp,3.e-5_wp,4.e-5_wp,5.e-5_wp,6.e-5_wp,7.e-5_wp,8.e-5_wp,9.e-5_wp, 1.e-4_wp,2.e-4_wp,3.e-4_wp,4.e-4_wp,5.e-4_wp,6.e-4_wp,7.e-4_wp,8.e-4_wp,9.e-4_wp, 1.e-3_wp]
real(wp), dimension(ntb_r), parameter	r_r = [1.e-6_wp,2.e-6_wp,3.e-6_wp,4.e-6_wp,5.e-6_wp,6.e-6_wp,7.e-6_wp,8.e-6_wp,9.e-6_wp, 1.e-5_wp,2.e-5_wp,3.e-5_wp,4.e-5_wp,5.e-5_wp,6.e-5_wp,7.e-5_wp,8.e-5_wp,9.e-5_wp, 1.e-4_wp,2.e-4_wp,3.e-4_wp,4.e-4_wp,5.e-4_wp,6.e-4_wp,7.e-4_wp,8.e-4_wp,9.e-4_wp, 1.e-3_wp,2.e-3_wp,3.e-3_wp,4.e-3_wp,5.e-3_wp,6.e-3_wp,7.e-3_wp,8.e-3_wp,9.e-3_wp, 1.e-2_wp]
real(wp), dimension(ntb_s), parameter	r_s = [1.e-6_wp,2.e-6_wp,3.e-6_wp,4.e-6_wp,5.e-6_wp,6.e-6_wp,7.e-6_wp,8.e-6_wp,9.e-6_wp, 1.e-5_wp,2.e-5_wp,3.e-5_wp,4.e-5_wp,5.e-5_wp,6.e-5_wp,7.e-5_wp,8.e-5_wp,9.e-5_wp, 1.e-4_wp,2.e-4_wp,3.e-4_wp,4.e-4_wp,5.e-4_wp,6.e-4_wp,7.e-4_wp,8.e-4_wp,9.e-4_wp, 1.e-3_wp,2.e-3_wp,3.e-3_wp,4.e-3_wp,5.e-3_wp,6.e-3_wp,7.e-3_wp,8.e-3_wp,9.e-3_wp, 1.e-2_wp]
real(wp), dimension(ntb_g), parameter	r_g = [1.e-6_wp,2.e-6_wp,3.e-6_wp,4.e-6_wp,5.e-6_wp,6.e-6_wp,7.e-6_wp,8.e-6_wp,9.e-6_wp, 1.e-5_wp,2.e-5_wp,3.e-5_wp,4.e-5_wp,5.e-5_wp,6.e-5_wp,7.e-5_wp,8.e-5_wp,9.e-5_wp, 1.e-4_wp,2.e-4_wp,3.e-4_wp,4.e-4_wp,5.e-4_wp,6.e-4_wp,7.e-4_wp,8.e-4_wp,9.e-4_wp, 1.e-3_wp,2.e-3_wp,3.e-3_wp,4.e-3_wp,5.e-3_wp,6.e-3_wp,7.e-3_wp,8.e-3_wp,9.e-3_wp, 1.e-2_wp]
real(wp), dimension(ntb_r1), parameter	n0r_exp = [1.e6_wp,2.e6_wp,3.e6_wp,4.e6_wp,5.e6_wp,6.e6_wp,7.e6_wp,8.e6_wp,9.e6_wp, 1.e7_wp,2.e7_wp,3.e7_wp,4.e7_wp,5.e7_wp,6.e7_wp,7.e7_wp,8.e7_wp,9.e7_wp, 1.e8_wp,2.e8_wp,3.e8_wp,4.e8_wp,5.e8_wp,6.e8_wp,7.e8_wp,8.e8_wp,9.e8_wp, 1.e9_wp,2.e9_wp,3.e9_wp,4.e9_wp,5.e9_wp,6.e9_wp,7.e9_wp,8.e9_wp,9.e9_wp, 1.e10_wp]
real(wp), dimension(ntb_g1), parameter	n0g_exp = [1.e2_wp,2.e2_wp,3.e2_wp,4.e2_wp,5.e2_wp,6.e2_wp,7.e2_wp,8.e2_wp,9.e2_wp, 1.e3_wp,2.e3_wp,3.e3_wp,4.e3_wp,5.e3_wp,6.e3_wp,7.e3_wp,8.e3_wp,9.e3_wp, 1.e4_wp,2.e4_wp,3.e4_wp,4.e4_wp,5.e4_wp,6.e4_wp,7.e4_wp,8.e4_wp,9.e4_wp, 1.e5_wp,2.e5_wp,3.e5_wp,4.e5_wp,5.e5_wp,6.e5_wp,7.e5_wp,8.e5_wp,9.e5_wp, 1.e6_wp]
real(wp), dimension(ntb_i1), parameter	nt_i = [1.0_wp,2.0_wp,3.0_wp,4.0_wp,5.0_wp,6.0_wp,7.0_wp,8.0_wp,9.0_wp, 1.e1_wp,2.e1_wp,3.e1_wp,4.e1_wp,5.e1_wp,6.e1_wp,7.e1_wp,8.e1_wp,9.e1_wp, 1.e2_wp,2.e2_wp,3.e2_wp,4.e2_wp,5.e2_wp,6.e2_wp,7.e2_wp,8.e2_wp,9.e2_wp, 1.e3_wp,2.e3_wp,3.e3_wp,4.e3_wp,5.e3_wp,6.e3_wp,7.e3_wp,8.e3_wp,9.e3_wp, 1.e4_wp,2.e4_wp,3.e4_wp,4.e4_wp,5.e4_wp,6.e4_wp,7.e4_wp,8.e4_wp,9.e4_wp, 1.e5_wp,2.e5_wp,3.e5_wp,4.e5_wp,5.e5_wp,6.e5_wp,7.e5_wp,8.e5_wp,9.e5_wp, 1.e6_wp]
real(wp), dimension(ntb_in), parameter	nt_in = [1.0_wp,2.0_wp,3.0_wp,4.0_wp,5.0_wp,6.0_wp,7.0_wp,8.0_wp,9.0_wp, 1.e1_wp,2.e1_wp,3.e1_wp,4.e1_wp,5.e1_wp,6.e1_wp,7.e1_wp,8.e1_wp,9.e1_wp, 1.e2_wp,2.e2_wp,3.e2_wp,4.e2_wp,5.e2_wp,6.e2_wp,7.e2_wp,8.e2_wp,9.e2_wp, 1.e3_wp,2.e3_wp,3.e3_wp,4.e3_wp,5.e3_wp,6.e3_wp,7.e3_wp,8.e3_wp,9.e3_wp, 1.e4_wp,2.e4_wp,3.e4_wp,4.e4_wp,5.e4_wp,6.e4_wp,7.e4_wp,8.e4_wp,9.e4_wp, 1.e5_wp,2.e5_wp,3.e5_wp,4.e5_wp,5.e5_wp,6.e5_wp,7.e5_wp,8.e5_wp,9.e5_wp, 1.e6_wp]
real(wp), dimension(ntb_arc), parameter	ta_na = [10._wp, 31.6_wp, 100._wp, 316._wp, 1000._wp, 3160._wp, 10000._wp]
real(wp), dimension(ntb_arw), parameter	ta_ww = [0.01_wp, 0.0316_wp, 0.1_wp, 0.316_wp, 1._wp, 3.16_wp, 10._wp, 31.6_wp, 100._wp]
real(wp), dimension(ntb_art), parameter	ta_tk = [243.15_wp, 253.15_wp, 263.15_wp, 273.15_wp, 283.15_wp, 293.15_wp, 303.15_wp]
real(wp), dimension(ntb_arr), parameter	ta_ra = [0.01_wp, 0.02_wp, 0.04_wp, 0.08_wp, 0.16_wp]
real(wp), dimension(ntb_ark), parameter	ta_ka = [0.2_wp, 0.4_wp, 0.6_wp, 0.8_wp]
real(wp), dimension(10), parameter	sa = [5.065339_wp, -0.062659_wp, -3.032362_wp, 0.029469_wp, -0.000285_wp, 0.31255_wp, 0.000204_wp, 0.003199_wp, 0._wp, -0.015952_wp]
real(wp), dimension(10), parameter	sb = [0.476221_wp, -0.015896_wp, 0.165977_wp, 0.007468_wp, -0.000141_wp, 0.060366_wp, 0.000079_wp, 0.000594_wp, 0._wp, -0.003577_wp]
real(wp), dimension(ntb_t), parameter	tc = [-0.01_wp, -5._wp, -10._wp, -15._wp, -20._wp, -25._wp, -30._wp, -35._wp, -40._wp]
integer, protected	dim_nrhg
real(wp), dimension(nrhg), protected	av_g = [45.9173813_wp, 67.0867386_wp, 98.0158463_wp, 122.353378_wp, 143.204224_wp, 161.794724_wp, 178.762115_wp, 194.488785_wp, 209.225876_wp]
real(wp), dimension(nrhg), protected	bv_g = [0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp, 0.640961647_wp]
real(wp), protected	am_i
real(wp), protected	am_r
real(wp), dimension(nrhg), protected	am_g
real(wp), protected	olfus
real(wp), protected	orv
real(wp), protected	ar_volume
real(wp), protected	sc3
real(wp), protected	d0i
real(wp), protected	xm0s
real(wp), protected	xm0g
real(wp), protected	obmi
real(wp), protected	obmr
real(wp), protected	oams
real(wp), protected	obms
real(wp), protected	ocms
real(wp), dimension(nrhg), protected	oamg
real(wp), dimension(nrhg), protected	ocmg
real(wp), protected	obmg
real(wp), dimension(5, 15), protected	cce
real(wp), dimension(5, 15), protected	ccg
real(wp), dimension(15), protected	ocg1
real(wp), dimension(15), protected	ocg2
real(wp), dimension(7), protected	cie
real(wp), dimension(7), protected	cig
real(wp), protected	oig1
real(wp), protected	oig2
real(wp), dimension(13), protected	cre
real(wp), dimension(13), protected	crg
real(wp), protected	ore1
real(wp), protected	org1
real(wp), protected	org2
real(wp), protected	org3
real(wp), dimension(17), protected	cse
real(wp), dimension(17), protected	csg
real(wp), dimension(12, nrhg), protected	cge
real(wp), dimension(12, nrhg), protected	cgg
real(wp), protected	oge1
real(wp), protected	ogg1
real(wp), protected	ogg2
real(wp), protected	ogg3
real(wp), protected	t1_qr_qc
real(wp), protected	t1_qr_qi
real(wp), protected	t2_qr_qi
real(wp), protected	t1_qs_qc
real(wp), protected	t1_qs_qi
real(wp), protected	t1_qr_ev
real(wp), protected	t2_qr_ev
real(wp), protected	t1_qs_sd
real(wp), protected	t2_qs_sd
real(wp), protected	t1_qs_me
real(wp), protected	t2_qs_me
real(wp), protected	t1_qg_sd
real(wp), protected	t1_qg_me
integer	nic2
integer	nii2
integer	nii3
integer	nir2
integer	nir3
integer	nis2
integer	nig2
integer	nig3
integer	niin2
real(dp)	nic1
	@history nic1 is used for cloud droplet number concentration lookup table
real(dp), dimension(nbc), protected	dc
real(dp), dimension(nbc), protected	dtc
real(dp), dimension(nbi), protected	di
real(dp), dimension(nbi), protected	dti
real(dp), dimension(nbr), protected	dr
real(dp), dimension(nbr), protected	dtr
real(dp), dimension(nbs), protected	ds
real(dp), dimension(nbs), protected	dts
real(dp), dimension(nbg), protected	dg
real(dp), dimension(nbg), protected	dtg
real(dp), dimension(nbc), protected	t_nc
integer, parameter	nhbins = 50
real(dp), dimension(:), allocatable, protected	hbins
real(dp), dimension(:), allocatable, protected	dhbins
integer, parameter	radar_bins = 50
real(dp), dimension(:), allocatable, protected	sbins_radar
real(dp), dimension(:), allocatable, protected	dsbins_radar
real(dp), dimension(:), allocatable, protected	gbins_radar
real(dp), dimension(:), allocatable, protected	dgbins_radar
real(dp), dimension(:,:), allocatable	t_efrw
real(dp), dimension(:,:), allocatable	t_efsw
real(dp), dimension(:,:,:), allocatable	tpc_wev
real(dp), dimension(:,:,:), allocatable	tnc_wev
real(table_sp), dimension(:,:,:,:,:), allocatable	tnccn_act
real(table_dp), dimension(:,:,:,:,:), allocatable	tcg_racg
real(table_dp), dimension(:,:,:,:,:), allocatable	tmr_racg
real(table_dp), dimension(:,:,:,:,:), allocatable	tcr_gacr
real(table_dp), dimension(:,:,:,:,:), allocatable	tnr_racg
real(table_dp), dimension(:,:,:,:,:), allocatable	tnr_gacr
real(table_dp), dimension(:,:,:,:), allocatable	tcs_racs1
real(table_dp), dimension(:,:,:,:), allocatable	tmr_racs1
real(table_dp), dimension(:,:,:,:), allocatable	tcs_racs2
real(table_dp), dimension(:,:,:,:), allocatable	tmr_racs2
real(table_dp), dimension(:,:,:,:), allocatable	tcr_sacr1
real(table_dp), dimension(:,:,:,:), allocatable	tms_sacr1
real(table_dp), dimension(:,:,:,:), allocatable	tcr_sacr2
real(table_dp), dimension(:,:,:,:), allocatable	tms_sacr2
real(table_dp), dimension(:,:,:,:), allocatable	tnr_racs1
real(table_dp), dimension(:,:,:,:), allocatable	tnr_racs2
real(table_dp), dimension(:,:,:,:), allocatable	tnr_sacr1
real(table_dp), dimension(:,:,:,:), allocatable	tnr_sacr2
real(table_dp), dimension(:,:,:,:), allocatable	tpi_qcfz
real(table_dp), dimension(:,:,:,:), allocatable	tni_qcfz
real(table_dp), dimension(:,:,:,:), allocatable	tpi_qrfz
real(table_dp), dimension(:,:,:,:), allocatable	tpg_qrfz
real(table_dp), dimension(:,:,:,:), allocatable	tni_qrfz
real(table_dp), dimension(:,:,:,:), allocatable	tnr_qrfz
real(dp), dimension(:,:), allocatable	tps_iaus
real(dp), dimension(:,:), allocatable	tni_iaus
real(dp), dimension(:,:), allocatable	tpi_ide