source: lmdz_wrf/trunk/WRFV3/dyn_nmm/nmm_loop_macros.h @ 409

Last change on this file since 409 was 1, checked in by lfita, 10 years ago
  • -- --- Opening of the WRF+LMDZ coupling repository --- -- -

WRF: version v3.3
LMDZ: version v1818

More details in:

File size: 4.2 KB
Line 
1! these define the various loop range variables
2! that were defined in module_MPP. Defined as macros
3! here to allow thread-safety/tile callability
4
5#define MYIS      MY_IS( 0 , 0  )
6#define MYIS_P1   MY_IS( 0 , 1  )
7#define MYIS_P2   MY_IS( 0 , 2  )
8#define MYIS_P3   MY_IS( 0 , 3  )
9#define MYIS_P4   MY_IS( 0 , 4  )
10#define MYIS_P5   MY_IS( 0 , 5  )
11#define MYIS1     MY_IS( 1 , 0  )
12#define MYIS1_P1  MY_IS( 1 , 1  )
13#define MYIS1_P2  MY_IS( 1 , 2  )
14#define MYIS1_P3  MY_IS( 1 , 3  )
15#define MYIS1_P4  MY_IS( 1 , 4  )
16#define MYIS1_P5  MY_IS( 1 , 5  )
17#define MYIS2     MY_IS( 2 , 0  )
18#define MYIS2_P1  MY_IS( 2 , 1  )
19#define MYIS2_P2  MY_IS( 2 , 2  )
20#define MYIS2_P3  MY_IS( 2 , 3  )
21#define MYIS2_P4  MY_IS( 2 , 4  )
22#define MYIS2_P5  MY_IS( 2 , 5  )
23#define MYIS3     MY_IS( 3 , 0  )
24#define MYIS3_P1  MY_IS( 3 , 1  )
25#define MYIS3_P2  MY_IS( 3 , 2  )
26#define MYIS3_P3  MY_IS( 3 , 3  )
27#define MYIS3_P4  MY_IS( 3 , 4  )
28#define MYIS3_P5  MY_IS( 3 , 5  )
29#define MYIS4     MY_IS( 4 , 0  )
30#define MYIS4_P1  MY_IS( 4 , 1  )
31#define MYIS4_P2  MY_IS( 4 , 2  )
32#define MYIS4_P3  MY_IS( 4 , 3  )
33#define MYIS4_P4  MY_IS( 4 , 4  )
34#define MYIS4_P5  MY_IS( 4 , 5  )
35
36#define MYIE      MY_IE( 0 , 0  )
37#define MYIE_P1   MY_IE( 0 , 1  )
38#define MYIE_P2   MY_IE( 0 , 2  )
39#define MYIE_P3   MY_IE( 0 , 3  )
40#define MYIE_P4   MY_IE( 0 , 4  )
41#define MYIE_P5   MY_IE( 0 , 5  )
42#define MYIE1     MY_IE( 1 , 0  )
43#define MYIE1_P1  MY_IE( 1 , 1  )
44#define MYIE1_P2  MY_IE( 1 , 2  )
45#define MYIE1_P3  MY_IE( 1 , 3  )
46#define MYIE1_P4  MY_IE( 1 , 4  )
47#define MYIE1_P5  MY_IE( 1 , 5  )
48#define MYIE2     MY_IE( 2 , 0  )
49#define MYIE2_P1  MY_IE( 2 , 1  )
50#define MYIE2_P2  MY_IE( 2 , 2  )
51#define MYIE2_P3  MY_IE( 2 , 3  )
52#define MYIE2_P4  MY_IE( 2 , 4  )
53#define MYIE2_P5  MY_IE( 2 , 5  )
54#define MYIE3     MY_IE( 3 , 0  )
55#define MYIE3_P1  MY_IE( 3 , 1  )
56#define MYIE3_P2  MY_IE( 3 , 2  )
57#define MYIE3_P3  MY_IE( 3 , 3  )
58#define MYIE3_P4  MY_IE( 3 , 4  )
59#define MYIE3_P5  MY_IE( 3 , 5  )
60#define MYIE4     MY_IE( 4 , 0  )
61#define MYIE4_P1  MY_IE( 4 , 1  )
62#define MYIE4_P2  MY_IE( 4 , 2  )
63#define MYIE4_P3  MY_IE( 4 , 3  )
64#define MYIE4_P4  MY_IE( 4 , 4  )
65#define MYIE4_P5  MY_IE( 4 , 5  )
66
67#define MYJS      MY_JS( 0 , 0  )
68#define MYJS_P1   MY_JS( 0 , 1  )
69#define MYJS_P2   MY_JS( 0 , 2  )
70#define MYJS_P3   MY_JS( 0 , 3  )
71#define MYJS_P4   MY_JS( 0 , 4  )
72#define MYJS_P5   MY_JS( 0 , 5  )
73#define MYJS1     MY_JS( 1 , 0  )
74#define MYJS1_P1  MY_JS( 1 , 1  )
75#define MYJS1_P2  MY_JS( 1 , 2  )
76#define MYJS1_P3  MY_JS( 1 , 3  )
77#define MYJS1_P4  MY_JS( 1 , 4  )
78#define MYJS1_P5  MY_JS( 1 , 5  )
79#define MYJS2     MY_JS( 2 , 0  )
80#define MYJS2_P1  MY_JS( 2 , 1  )
81#define MYJS2_P2  MY_JS( 2 , 2  )
82#define MYJS2_P3  MY_JS( 2 , 3  )
83#define MYJS2_P4  MY_JS( 2 , 4  )
84#define MYJS2_P5  MY_JS( 2 , 5  )
85#define MYJS3     MY_JS( 3 , 0  )
86#define MYJS3_P1  MY_JS( 3 , 1  )
87#define MYJS3_P2  MY_JS( 3 , 2  )
88#define MYJS3_P3  MY_JS( 3 , 3  )
89#define MYJS3_P4  MY_JS( 3 , 4  )
90#define MYJS3_P5  MY_JS( 3 , 5  )
91#define MYJS4     MY_JS( 4 , 0  )
92#define MYJS4_P1  MY_JS( 4 , 1  )
93#define MYJS4_P2  MY_JS( 4 , 2  )
94#define MYJS4_P3  MY_JS( 4 , 3  )
95#define MYJS4_P4  MY_JS( 4 , 4  )
96#define MYJS4_P5  MY_JS( 4 , 5  )
97#define MYJS5     MY_JS( 5 , 0  )
98
99#define MYJE      MY_JE( 0 , 0  )
100#define MYJE_P1   MY_JE( 0 , 1  )
101#define MYJE_P2   MY_JE( 0 , 2  )
102#define MYJE_P3   MY_JE( 0 , 3  )
103#define MYJE_P4   MY_JE( 0 , 4  )
104#define MYJE_P5   MY_JE( 0 , 5  )
105#define MYJE1     MY_JE( 1 , 0  )
106#define MYJE1_P1  MY_JE( 1 , 1  )
107#define MYJE1_P2  MY_JE( 1 , 2  )
108#define MYJE1_P3  MY_JE( 1 , 3  )
109#define MYJE1_P4  MY_JE( 1 , 4  )
110#define MYJE1_P5  MY_JE( 1 , 5  )
111#define MYJE2     MY_JE( 2 , 0  )
112#define MYJE2_P1  MY_JE( 2 , 1  )
113#define MYJE2_P2  MY_JE( 2 , 2  )
114#define MYJE2_P3  MY_JE( 2 , 3  )
115#define MYJE2_P4  MY_JE( 2 , 4  )
116#define MYJE2_P5  MY_JE( 2 , 5  )
117#define MYJE3     MY_JE( 3 , 0  )
118#define MYJE3_P1  MY_JE( 3 , 1  )
119#define MYJE3_P2  MY_JE( 3 , 2  )
120#define MYJE3_P3  MY_JE( 3 , 3  )
121#define MYJE3_P4  MY_JE( 3 , 4  )
122#define MYJE3_P5  MY_JE( 3 , 5  )
123#define MYJE4     MY_JE( 4 , 0  )
124#define MYJE4_P1  MY_JE( 4 , 1  )
125#define MYJE4_P2  MY_JE( 4 , 2  )
126#define MYJE4_P3  MY_JE( 4 , 3  )
127#define MYJE4_P4  MY_JE( 4 , 4  )
128#define MYJE4_P5  MY_JE( 4 , 5  )
129#define MYJE5     MY_JE( 5 , 0  )
130
Note: See TracBrowser for help on using the repository browser.