ply_alpha_beta Function

private function ply_alpha_beta(denominator, numerator) result(alpha_beta)

Prodcut of alpha(numerator) * beta(denominator) / alpha(denominator)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	denominator	Denominator
integer,	intent(in)			::	numerator	Numerator

Return Value real(kind=rk)

The product of alpha(n) * beta(d) / alpha(d)