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 |