Last change
on this file since 21 was
3,
checked in by slebonnois, 14 years ago
|
Creation de repertoires:
- chantiers : pour communiquer sur nos projets de modifs
- documentation : pour stocker les docs
Ajout de:
- libf/phytitan : physique de Titan
- libf/chimtitan: chimie de Titan
- libf/phyvenus : physique de Venus
|
File size:
250 bytes
|
Rev | Line | |
---|
[3] | 1 | FUNCTION PC2H2(T) |
---|
| 2 | C THIS FUNCTION RETURNS THE VAPOR PRESSURE IN BARS. |
---|
| 3 | C BASED ON A LEAST SQUARES FIT TO DATA IN TABLE III |
---|
| 4 | C NBS TECHNICAL PB-151 363 |
---|
| 5 | DATA A,B/21.68901,-2814.018/ |
---|
| 6 | PC2H2=(1./760.)*EXP(A+B/T) |
---|
| 7 | RETURN |
---|
| 8 | END |
---|
Note: See
TracBrowser
for help on using the repository browser.