Last change
on this file since 937 was
816,
checked in by slebonnois, 12 years ago
|
SL: tools for postprocessing (Veznus and Titan); see DOC/documentation/vt-tools.pdf
|
File size:
595 bytes
|
Line | |
---|
1 | ! Parameters needed to integrate hydrostatic equation: |
---|
2 | |
---|
3 | real,parameter :: g0=9.80616 |
---|
4 | !g0: exact mean gravity at radius=6371.22km |
---|
5 | |
---|
6 | real,parameter :: a0=6371.22E3 |
---|
7 | !a0: 'mean' radius=6371.22km |
---|
8 | |
---|
9 | real,parameter :: R0=287.1 ! molecular gas constant |
---|
10 | |
---|
11 | real,parameter :: psref=1.0e5 ! reference pressure at surface (Pa) |
---|
12 | |
---|
13 | real,parameter :: omega=7.29e-5 ! angular rotation speed (s-1) |
---|
14 | |
---|
15 | real,parameter :: localday=86400. ! local day (s) |
---|
16 | |
---|
17 | character (len=5),parameter :: planet="Earth" |
---|
18 | |
---|
19 | real,parameter :: cp0=1004.64 !doit etre egal a cpp (dyn) et RCPD (phy) |
---|
20 | real,parameter :: t0=0. |
---|
21 | real,parameter :: nu=0. |
---|
22 | |
---|
Note: See
TracBrowser
for help on using the repository browser.