get_CDMS_einstA Module Subroutine

public module subroutine get_CDMS_einstA(Nlo, Kalo, Kclo, Nup, Kaup, Kcup, CDMS_transitions, EinstA)

Given the quantum numbers of a rotational transition, find the matching CDMS transition and get the corresponding Einstein A coefficient

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	Nlo
integer,	intent(in)			::	Kalo
integer,	intent(in)			::	Kclo
integer,	intent(in)			::	Nup
integer,	intent(in)			::	Kaup
integer,	intent(in)			::	Kcup
class(asymtop_transition_type),	intent(in)			::	CDMS_transitions(:)
real(kind=dp),	intent(out)			::	EinstA