kd Subroutine
public pure subroutine kd(T, gas, heavywater, k)
Compute the vapor-liquid constant kd for a given temperature.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | intent(in) | :: | T(:) |
Temperature in °C. |
||
| 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. |