kd Subroutine

public pure subroutine kd(T, gas, heavywater, k)

Compute the vapor-liquid constant kd for a given temperature.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: T(:)

Temperature in K.

character(len=*), intent(in) :: gas

Gas.

integer(kind=int32), intent(in) :: heavywater

Flag if D2O (1) is used or H2O(0).

real(kind=dp), intent(out) :: k(:)

Vapor-liquid constant. Filled with NaNs if gas not found.


Called by

proc~~kd~~CalledByGraph proc~kd kd proc~capi_kd capi_kd proc~capi_kd->proc~kd