capi_kh Subroutine

public subroutine capi_kh(T, gas, heavywater, k, size_gas, size_T) bind(C,name="iapws_g704_kh")

Compute the henry constant for a given temperature.

Arguments

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

Temperature in °C.

type(c_ptr), intent(in), value :: gas

Gas.

integer(kind=c_int), intent(in), value :: heavywater

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

real(kind=c_double), intent(inout) :: k(size_T)

Henry constant. Filled with NaNs if gas not found.

integer(kind=c_int), intent(in), value :: size_gas

Size of the gas string.

integer(kind=c_size_t), intent(in), value :: size_T

Size of T and k.


Calls

proc~~capi_kh~~CallsGraph proc~capi_kh capi_kh proc~kh kh proc~capi_kh->proc~kh