LMDZ
yomcst.F90
Go to the documentation of this file.
1 MODULE yomcst
2 
3 
4 #include "tsmbkind.h"
5 
6 IMPLICIT NONE
7 
8 SAVE
9 
10 ! ------------------------------------------------------------------
11 
12 !* Common of physical constants
13 ! You will find the meanings in the annex 1 of the documentation
14 
15 ! A1.0 Fundamental constants
16 real_b :: rpi
17 real_b :: rclum
18 real_b :: rhpla
19 real_b :: rkbol
20 real_b :: rnavo
21 ! A1.1 Astronomical constants
22 real_b :: rday
23 real_b :: rea
24 real_b :: repsm
25 real_b :: rsiyea
26 real_b :: rsiday
27 real_b :: romega
28 ! A1.2 Geoide
29 real_b :: ra
30 real_b :: rg
31 real_b :: r1sa
32 ! A1.3 Radiation
33 real_b :: rsigma
34 real_b :: ri0
35 ! A1.4 Thermodynamic gas phase
36 real_b :: r
37 real_b :: rmd
38 real_b :: rmv
39 real_b :: rmo3
40 real_b :: rd
41 real_b :: rv
42 real_b :: rcpd
43 real_b :: rcpv
44 real_b :: rcvd
45 real_b :: rcvv
46 real_b :: rkappa
47 real_b :: retv
48 ! A1.5,6 Thermodynamic liquid,solid phases
49 real_b :: rcw
50 real_b :: rcs
51 ! A1.7 Thermodynamic transition of phase
52 real_b :: rlvtt
53 real_b :: rlstt
54 real_b :: rlvzer
55 real_b :: rlszer
56 real_b :: rlmlt
57 real_b :: rtt
58 real_b :: ratm
59 real_b :: rdt
60 ! A1.8 Curve of saturation
61 real_b :: restt
62 real_b :: ralpw
63 real_b :: rbetw
64 real_b :: rgamw
65 real_b :: ralps
66 real_b :: rbets
67 real_b :: rgams
68 real_b :: ralpd
69 real_b :: rbetd
70 real_b :: rgamd
71 
72 
73 ! ------------------------------------------------------------------
74 END MODULE yomcst
real(kind=jprb) rgamw
Definition: yomcst.F90:72
real(kind=jprb) rpi
Definition: yomcst.F90:15
real(kind=jprb) rbetw
Definition: yomcst.F90:71
real(kind=jprb) rgams
Definition: yomcst.F90:75
!$Id mode_top_bound COMMON comconstr r
Definition: comconst.h:7
real(kind=jprb) rday
Definition: yomcst.F90:21
real(kind=jprb) rd
Definition: yomcst.F90:39
real(kind=jprb) restt
Definition: yomcst.F90:69
real(kind=jprb) rlstt
Definition: yomcst.F90:61
real(kind=jprb) ratm
Definition: yomcst.F90:66
real(kind=jprb) rtt
Definition: yomcst.F90:65
real(kind=jprb) rg
Definition: yomcst.F90:29
real(kind=jprb) rclum
Definition: yomcst.F90:16
real(kind=jprb) rnavo
Definition: yomcst.F90:19
real(kind=jprb) rlvtt
Definition: yomcst.F90:60
real(kind=jprb) rmo3
Definition: yomcst.F90:38
real(kind=jprb) rkbol
Definition: yomcst.F90:18
real(kind=jprb) rcs
Definition: yomcst.F90:58
real(kind=jprb) rlvzer
Definition: yomcst.F90:62
real(kind=jprb) r1sa
Definition: yomcst.F90:30
real(kind=jprb) rcw
Definition: yomcst.F90:57
real(kind=jprb) rmv
Definition: yomcst.F90:37
real(kind=jprb) rcpv
Definition: yomcst.F90:42
real(kind=jprb) rdt
Definition: yomcst.F90:67
real(kind=jprb) rgamd
Definition: yomcst.F90:78
real(kind=jprb) rhpla
Definition: yomcst.F90:17
real(kind=jprb) rsiday
Definition: yomcst.F90:25
real(kind=jprb) rcpd
Definition: yomcst.F90:41
real(kind=jprb) rcvv
Definition: yomcst.F90:44
real(kind=jprb) ri0
Definition: yomcst.F90:33
real(kind=jprb) ra
Definition: yomcst.F90:28
real(kind=jprb) retv
Definition: yomcst.F90:46
real(kind=jprb) ralpw
Definition: yomcst.F90:70
real(kind=jprb) rkappa
Definition: yomcst.F90:45
real(kind=jprb) rlmlt
Definition: yomcst.F90:64
real(kind=jprb) repsm
Definition: yomcst.F90:23
real(kind=jprb) romega
Definition: yomcst.F90:26
real(kind=jprb) rsigma
Definition: yomcst.F90:32
real(kind=jprb) rv
Definition: yomcst.F90:40
real(kind=jprb) rsiyea
Definition: yomcst.F90:24
real(kind=jprb) rbets
Definition: yomcst.F90:74
real(kind=jprb) ralps
Definition: yomcst.F90:73
real(kind=jprb) ralpd
Definition: yomcst.F90:76
Definition: yomcst.F90:1
real(kind=jprb) rlszer
Definition: yomcst.F90:63
real(kind=jprb) rea
Definition: yomcst.F90:22
real(kind=jprb) rmd
Definition: yomcst.F90:36
real(kind=jprb) rbetd
Definition: yomcst.F90:77
real(kind=jprb) rcvd
Definition: yomcst.F90:43