module_mp_tempo_diags – TEMPO Microphysics

diagnostic output

Uses

- module_mp_tempo_params
- module_mp_tempo_utils
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Functions

private function find_melting_level(temp, l_qr, l_qs, l_qg) result(k_melt)

finds the melting level

Arguments

Type	Intent	Attributes		Name
real(kind=wp),	intent(in),	dimension(:)	::	temp
logical,	intent(in),	dimension(:)	::	l_qr
logical,	intent(in),	dimension(:)	::	l_qs
logical,	intent(in),	dimension(:)	::	l_qg

Return Value integer

private function complex_water_ray(lambda, t) result(refractive_index)

complex refractive index of water from Ray (1972) calculated as function of temperature t [Celsius] (valid from -10 to 30) and radar wavelength lambda [m] (valid from 0.001 to 1)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	lambda
real(kind=dp),	intent(in)			::	t

Return Value complex(kind=dp)

private function complex_ice_maetzler(lambda, t) result(refractive_index)

complex refractive index of ice from Maetzler (1998) calculated as function of temperature t [Celsius] (valid from -250 to 0) and radar wavelength lambda [m] (valid from 0.0001 to 30)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	lambda
real(kind=dp),	intent(in)			::	t

Return Value complex(kind=dp)

private function reflectivity_from_melting_graupel(rg, ng, ilamg, idx, rr) result(ze_graupel)

calculates radar reflectivity from melting graupel using binned approach

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	rg
real(kind=wp),	intent(in)	::	ng
real(kind=dp),	intent(in)	::	ilamg
integer,	intent(in)	::	idx
real(kind=wp),	intent(in)	::	rr

Return Value real(kind=wp)

private function reflectivity_from_melting_snow(rs, smob, smoc, rr) result(ze_snow)

calculates radar reflectivity from melting snow using binned approach

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	rs
real(kind=dp),	intent(in)	::	smob
real(kind=dp),	intent(in)	::	smoc
real(kind=wp),	intent(in)	::	rr

Return Value real(kind=wp)

Subroutines

public subroutine effective_radius(temp, l_qc, nc, ilamc, l_qi, ilami, l_qs, rs, re_qc, re_qi, re_qs)

effective radius values for cloud water, cloud ice and snow

Arguments

Type	Intent	Attributes		Name
real(kind=wp),	intent(in),	dimension(:)	::	temp
logical,	intent(in),	dimension(:)	::	l_qc
real(kind=wp),	intent(in),	dimension(:)	::	nc
real(kind=dp),	intent(in),	dimension(:)	::	ilamc
logical,	intent(in),	dimension(:)	::	l_qi
real(kind=dp),	intent(in),	dimension(:)	::	ilami
logical,	intent(in),	dimension(:)	::	l_qs
real(kind=wp),	intent(in),	dimension(:)	::	rs
real(kind=wp),	intent(out),	dimension(:)	::	re_qc
real(kind=wp),	intent(out),	dimension(:)	::	re_qi
real(kind=wp),	intent(out),	dimension(:)	::	re_qs

public subroutine reflectivity_10cm(refl10cm_from_melting_flag, temp, l_qr, rr, nr, ilamr, l_qs, rs, smoc, smob, smoz, l_qg, rg, ng, idx, ilamg, dbz)

10-cm radar reflectivity

Arguments

Type	Intent	Attributes		Name
logical,	intent(in)		::	refl10cm_from_melting_flag
real(kind=wp),	intent(in),	dimension(:)	::	temp
logical,	intent(in),	dimension(:)	::	l_qr
real(kind=wp),	intent(in),	dimension(:)	::	rr
real(kind=wp),	intent(in),	dimension(:)	::	nr
real(kind=dp),	intent(in),	dimension(:)	::	ilamr
logical,	intent(in),	dimension(:)	::	l_qs
real(kind=wp),	intent(in),	dimension(:)	::	rs
real(kind=dp),	intent(in),	dimension(:)	::	smoc
real(kind=dp),	intent(in),	dimension(:)	::	smob
real(kind=dp),	intent(in),	dimension(:)	::	smoz
logical,	intent(in),	dimension(:)	::	l_qg
real(kind=wp),	intent(in),	dimension(:)	::	rg
real(kind=wp),	intent(in),	dimension(:)	::	ng
integer,	intent(in),	dimension(:)	::	idx
real(kind=dp),	intent(in),	dimension(:)	::	ilamg
real(kind=wp),	intent(out),	dimension(:)	::	dbz

private subroutine rayleigh_soak_wetgraupel(x_g, a_geo, b_geo, fmelt, lambda_radar, meltratio_outside, m_w, m_i, backscatter)

calculates backscatter cross section of wet snow or graupel using Maxwell-Garnett mixing formula and Rayleigh approximation

Arguments

Type	Intent		Name
real(kind=dp),	intent(in)	::	x_g
real(kind=dp),	intent(in)	::	a_geo
real(kind=dp),	intent(in)	::	b_geo
real(kind=dp),	intent(in)	::	fmelt
real(kind=dp),	intent(in)	::	lambda_radar
real(kind=dp),	intent(in)	::	meltratio_outside
complex(kind=dp),	intent(in)	::	m_w
complex(kind=dp),	intent(in)	::	m_i
real(kind=dp),	intent(out)	::	backscatter

public subroutine max_hail_diam(rho, rg, ng, ilamg, idx, max_hail_diameter)

estimates maximmum hail diameter [mm] using a binned approach

Arguments

Type	Intent	Attributes		Name
real(kind=wp),	intent(in),	dimension(:)	::	rho
real(kind=wp),	intent(in),	dimension(:)	::	rg
real(kind=wp),	intent(in),	dimension(:)	::	ng
real(kind=dp),	intent(in),	dimension(:)	::	ilamg
integer,	intent(in),	dimension(:)	::	idx
real(kind=wp),	intent(out),	dimension(:)	::	max_hail_diameter

public subroutine freezing_rain(temp, rain_precip, cloud_precip, frz_rain)

estimates freezing rain/drizzle accumulation

Arguments

Type	Intent	Optional		Name
real(kind=wp),	intent(in)		::	temp
real(kind=wp),	intent(in)		::	rain_precip
real(kind=wp),	intent(in),	optional	::	cloud_precip
real(kind=wp),	intent(out)		::	frz_rain

module_mp_tempo_diags Module

Contents

Functions

Subroutines

Uses

Used by

Functions

private function find_melting_level(temp, l_qr, l_qs, l_qg) result(k_melt)

Arguments

Return Value integer

private function complex_water_ray(lambda, t) result(refractive_index)

Arguments

Return Value complex(kind=dp)

private function complex_ice_maetzler(lambda, t) result(refractive_index)

Arguments

Return Value complex(kind=dp)

private function reflectivity_from_melting_graupel(rg, ng, ilamg, idx, rr) result(ze_graupel)

Arguments

Return Value real(kind=wp)

private function reflectivity_from_melting_snow(rs, smob, smoc, rr) result(ze_snow)

Arguments

Return Value real(kind=wp)

Subroutines

public subroutine effective_radius(temp, l_qc, nc, ilamc, l_qi, ilami, l_qs, rs, re_qc, re_qi, re_qs)

Arguments

public subroutine reflectivity_10cm(refl10cm_from_melting_flag, temp, l_qr, rr, nr, ilamr, l_qs, rs, smoc, smob, smoz, l_qg, rg, ng, idx, ilamg, dbz)

Arguments

private subroutine rayleigh_soak_wetgraupel(x_g, a_geo, b_geo, fmelt, lambda_radar, meltratio_outside, m_w, m_i, backscatter)

Arguments

public subroutine max_hail_diam(rho, rg, ng, ilamg, idx, max_hail_diameter)

Arguments

public subroutine freezing_rain(temp, rain_precip, cloud_precip, frz_rain)

Arguments