source: trunk/LMDZ.TITAN.old/libf/phytitan/pch4.F @ 3303

Last change on this file since 3303 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: 286 bytes
Line 
1      FUNCTION PCH4(T)
2C THIS SUBROUTINE RETURNS THE VAPOR PRESSURE OF METHANE
3C OVER THE TEMPERATURE INTERVAL (74-97K) IN UNITS OF BARS
4C IT IS BASED ON DATA FROM THE MATHASEN GAS DATA BOOK P 351
5C FITTED BY CP MCKAY 10/85
6      PCH4=3.4543E4 * EXP(-1145.705/T)
7      RETURN
8      END
Note: See TracBrowser for help on using the repository browser.