source:
LMDZ6/trunk/libf/obsolete/fcg_racmo.h
@
5440
Last change on this file since 5440 was 5302, checked in by , 7 weeks ago | |
---|---|
File size: 298 bytes |
Rev | Line | |
---|---|---|
[2017] | 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 |
Note: See TracBrowser
for help on using the repository browser.