Temperature to saturation vapor pressure.
More...
Go to the source code of this file.
|
real function | w3fa09 (tk) |
| Computes saturation vapor pressure in kilopascals given temperataure in kelvins.
|
|
Temperature to saturation vapor pressure.
- Author
- P. Chase
- Date
- 1978-10-01
Definition in file w3fa09.f.
◆ w3fa09()
real function w3fa09 |
( |
|
tk | ) |
|
Computes saturation vapor pressure in kilopascals given temperataure in kelvins.
Program history log:
- P. Chase 1978-10-01 P.CHASE
- Ralph Jones 1984-06-26 Change to ibm vs fortran.
- Ralph Jones 1984-06-26 Change to microsoft fortran 4.10.
- Ralph Jones 1990-06-08 Change to sun fortran 1.3.
- Ralph Jones 1991-03-29 Convert to silicongraphic fortran.
- Ralph Jones 1993-03-29 Add save statement.
- Ralph Jones 1995-09-25 Change tk to cray 64 bit real, change double. precision to cray 64 bit real.
- Parameters
-
[in] | TK | REAL*8 Temperature in kelvins. if tk < 223.16, the value 223.16 will be used. if tk > 323.16, the value 323.16 will be used as the argument. 'tk' itself is unchanged. |
- Returns
- VP Saturation vapor pressure in kilopascals 0.0063558 < VP < 12.3395.
- Note
- W3FA09 may be declared real*8 so that a real*8 value is returned, but no increase in accuracy is implied.
- Author
- P. Chase
- Date
- 1978-10-01
Definition at line 26 of file w3fa09.f.