Compute the vapor-liquid constant kd for a given temperature.
Type | Intent | Optional | 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. |