source: LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_fcg_gcssold.f90

Last change on this file was 5142, checked in by abarral, 3 months ago

Put cvparam.h, fcg_gcssold.h, planete.h, tsoilnudge.h, YOECUMF.h into modules

File size: 430 bytes
Line 
1MODULE lmdz_fcs_gcssold
2  IMPLICIT NONE; PRIVATE
3  PUBLIC imp_fcg_gcssold, ts_fcg_gcssold, Tp_fcg_gcssold, Tp_ini_gcssold, xTurb_fcg_gcssold
4
5  LOGICAL :: imp_fcg_gcssold, ts_fcg_gcssold, Tp_fcg_gcssold
6  LOGICAL :: Tp_ini_gcssold
7  LOGICAL :: xTurb_fcg_gcssold
8
9  !$OMP THREADPRIVATE(imp_fcg_gcssold, ts_fcg_gcssold, Tp_fcg_gcssold, Tp_ini_gcssold, xTurb_fcg_gcssold)
10END MODULE lmdz_fcs_gcssold
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Note: See TracBrowser for help on using the repository browser.