LMDZ
yoephli.F90
Go to the documentation of this file.
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
real(kind=jprb) rlpevap
Definition: yoephli.F90:27
real(kind=jprb) rlpdd
Definition: yoephli.F90:23
real(kind=jprb) rlpp00
Definition: yoephli.F90:28
logical lphylin
Definition: yoephli.F90:13
real(kind=jprb) rlpmixl
Definition: yoephli.F90:24
real(kind=jprb) rlpcc
Definition: yoephli.F90:22
real(kind=jprb) rlpbb
Definition: yoephli.F90:21
real(kind=jprb) rlpdrag
Definition: yoephli.F90:26
real(kind=jprb) rlpal1
Definition: yoephli.F90:19
real(kind=jprb) rlpbeta
Definition: yoephli.F90:25
real(kind=jprb) rlptrc
Definition: yoephli.F90:18
real(kind=jprb) rlpal2
Definition: yoephli.F90:20