LMDZ
fcg_racmo.h
Go to the documentation of this file.
1 !
2 ! $Id: fcg_racmo.h 2011-02-16 17:02:56Z cheruy $
3 !
4  real :: a_guide
5  logical :: ok_invertp
6  integer :: forc_trb
7  character*31 :: fich_racmo
8 
9  common /fcg_racmo/forc_trb,ok_invertp,a_guide,fich_racmo
10 
11 !$OMP THREADPRIVATE(/fcg_racmo/)
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 
44 
45 
THREADPRIVATE
!IM for NMC files!real nfiles!real nfiles!real nfiles!real nlevSTD3 real nlevSTD3 real nlevSTD3 real nlevSTD3 real nlevSTD8 real nlevSTD8 real nlevSTD8 real nlevSTD8!$OMP THREADPRIVATE(rlevstd) CHARACTER *4
$Id
c c $Id
Definition: ini_bilKP_ave.h:11
a_guide
!$Id a_guide
Definition: fcg_racmo.h:9
ok_invertp
!$Id ok_invertp
Definition: fcg_racmo.h:9