Last change
on this file since 2100 was
2089,
checked in by Laurent Fairhead, 10 years ago
|
Inclusion de la physique de MAR
Integration of MAR physics
|
File size:
1.6 KB
|
Rev | Line | |
---|
[2089] | 1 | MODULE YOEPHLI |
---|
| 2 | |
---|
| 3 | |
---|
| 4 | #include "tsmbkind.h" |
---|
| 5 | |
---|
| 6 | IMPLICIT NONE |
---|
| 7 | |
---|
| 8 | SAVE |
---|
| 9 | |
---|
| 10 | ! ------------------------------------------------------------------ |
---|
| 11 | !* ** *YOEPHLI* CONTAINS CONSTANTS FOR THE LINEARIZED PHYSICS |
---|
| 12 | ! ------------------------------------------------------------------ |
---|
| 13 | |
---|
| 14 | LOGICAL LPHYLIN |
---|
| 15 | |
---|
| 16 | REAL_B :: RLPTRC |
---|
| 17 | REAL_B :: RLPAL1 |
---|
| 18 | REAL_B :: RLPAL2 |
---|
| 19 | REAL_B :: RLPBB |
---|
| 20 | REAL_B :: RLPCC |
---|
| 21 | REAL_B :: RLPDD |
---|
| 22 | REAL_B :: RLPMIXL |
---|
| 23 | REAL_B :: RLPBETA |
---|
| 24 | REAL_B :: RLPDRAG |
---|
| 25 | REAL_B :: RLPEVAP |
---|
| 26 | REAL_B :: RLPP00 |
---|
| 27 | |
---|
| 28 | !* *YOEPHLI* CONTAINS CONSTANTS NEEDED BY |
---|
| 29 | ! THE LINEARIZED PHYSICS |
---|
| 30 | |
---|
| 31 | |
---|
| 32 | ! J.F. MAHFOUF E.C.M.W.F. 23/06/96 |
---|
| 33 | |
---|
| 34 | |
---|
| 35 | ! NAME TYPE DESCRIPTION |
---|
| 36 | ! ---- ---- ----------- |
---|
| 37 | |
---|
| 38 | ! *RLPTRC* REAL CRITICAL TEMPERATURE FOR MIXED PHASE PROPERTIES |
---|
| 39 | ! OF WATER |
---|
| 40 | ! *RLPAL1* REAL SMOOTHING COEFFICIENT |
---|
| 41 | ! *RLPAL2* REAL SMOOTHING COEFFICIENT |
---|
| 42 | ! *RLPBB* REAL CONSTANT FROM THE LOUIS ET AL. FORMULATION |
---|
| 43 | ! *RLPCC* REAL CONSTANT FROM THE LOUIS ET AL. FORMULATION |
---|
| 44 | ! *RLPDD* REAL CONSTANT FROM THE LOUIS ET AL. FORMULATION |
---|
| 45 | ! *RLPMIXL* REAL PSEUDO DEPTH OF THE PLANETARY BOUNDARY LAYER |
---|
| 46 | ! *RLPBETA* REAL REDUCTION FACTOR OF THE ASYMPTOTIC MIXING LENGTH |
---|
| 47 | ! *RLPDRAG* REAL COEFFICIENT FOR THE ESTIMATION OF SURFACE DRAG |
---|
| 48 | ! *RLPEVAP* REAL FRACTION OF POSSIBLE RAINFALL EVAPORATION |
---|
| 49 | ! *RLPP00* REAL PRESSURE ABOVE WHICH RADIATION IS NOT APPLIED |
---|
| 50 | ! *LPHYLIN* LOGICAL TRUE WHEN LINEARIZED PHYSICS IS ACTIVATED |
---|
| 51 | |
---|
| 52 | ! ------------------------------------------------------------------ |
---|
| 53 | END MODULE YOEPHLI |
---|
Note: See
TracBrowser
for help on using the repository browser.