Parent Directory
| 
Revision Log
Inlined procedure "pression". Split "guide.f90" into "guide.f90" and "tau2alpha.f90". Split "read_reanalyse.f" into single-procedure files in directory "Read_reanalyse". Useless copy of variables in "iniphysiq". Directly define module variables in "gcm" and remove procedure "iniphysiq". Added "pressure-altitude" in "test_disvert".
| 1 | module yoethf |
| 2 | |
| 3 | ! From phylmd/yoethf.inc,v 1.1.1.1 2004/05/19 12:53:09 |
| 4 | ! DERIVED CONSTANTS SPECIFIC TO ECMWF THERMODYNAMICS |
| 5 | |
| 6 | implicit none |
| 7 | |
| 8 | REAL R2ES, R3LES, R3IES, R4LES, R4IES, R5LES, R5IES |
| 9 | ! CONSTANTS USED FOR COMPUTATION OF SATURATION MIXING RATIO OVER |
| 10 | ! LIQUID WATER (R_LES) OR ICE (R_IES) |
| 11 | |
| 12 | REAL RVTMP2 ! RCPV / RCPD - 1. |
| 13 | real RHOH2O ! DENSITY OF LIQUID WATER (RATM / 100.) |
| 14 | |
| 15 | save |
| 16 | |
| 17 | end module yoethf |
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |