My Project
 All Classes Files Functions Variables Macros
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