H_for_thermal_balance Function

private function H_for_thermal_balance(x)

Arguments

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

Return Value real(kind=dp)

Contents

None