Line data Source code
1 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
2 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
3 : !!!! !!!!
4 : !!!! ParaMonte: Parallel Monte Carlo and Machine Learning Library. !!!!
5 : !!!! !!!!
6 : !!!! Copyright (C) 2012-present, The Computational Data Science Lab !!!!
7 : !!!! !!!!
8 : !!!! This file is part of the ParaMonte library. !!!!
9 : !!!! !!!!
10 : !!!! LICENSE !!!!
11 : !!!! !!!!
12 : !!!! https://github.com/cdslaborg/paramonte/blob/main/LICENSE.md !!!!
13 : !!!! !!!!
14 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
15 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16 :
17 : !> \brief
18 : !> This module contains tests of the module [pm_arrayInit](@ref pm_arrayInit).
19 : !>
20 : !> \bug
21 : !> \status \unresolved
22 : !> \source \ifort{2022}
23 : !> \desc
24 : !> There is a viscous \ifort{2022} bug where the appearance of the following `use` statements
25 : !> in the body of the implementation include file `test_pm_arrayRebill@routines.inc.F90` leads to various
26 : !> mistakes in parsing and preprocessing the contents of the include file.<br>
27 : !> The threshold for the maximum number of `use` statements within the entire submodule appears to be
28 : !> about `55`, because activating more than 55 procedures of the submodule
29 : !> leads to compilation failures due syntax parsing mistakes by the Intel compiler.<br>
30 : !> \remedy
31 : !> For now, all `use` statements are moved to the declaration body of the submodules.<br>
32 : !> This causes non-locality of the statements, but is the only solution as of today.<br>
33 : !>
34 : !> \fintest
35 : !>
36 : !> \author
37 : !> \FatemehBagheri, Wednesday 12:20 AM, October 13, 2021, Dallas, TX
38 :
39 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
40 :
41 : module test_pm_arrayInit
42 :
43 : use pm_arrayInit
44 : use pm_test, only: test_type, LK
45 :
46 : implicit none
47 :
48 : private
49 : public :: setTest
50 : type(test_type) :: test
51 :
52 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
53 :
54 : interface
55 :
56 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
57 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
58 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
59 :
60 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
61 :
62 : #if SK5_ENABLED
63 : module function test_getCoreHaloArr_D0_SK5() result(assertion); logical(LK) :: assertion; end function
64 : #endif
65 : #if SK4_ENABLED
66 : module function test_getCoreHaloArr_D0_SK4() result(assertion); logical(LK) :: assertion; end function
67 : #endif
68 : #if SK3_ENABLED
69 : module function test_getCoreHaloArr_D0_SK3() result(assertion); logical(LK) :: assertion; end function
70 : #endif
71 : #if SK2_ENABLED
72 : module function test_getCoreHaloArr_D0_SK2() result(assertion); logical(LK) :: assertion; end function
73 : #endif
74 : #if SK1_ENABLED
75 : module function test_getCoreHaloArr_D0_SK1() result(assertion); logical(LK) :: assertion; end function
76 : #endif
77 :
78 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
79 :
80 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
81 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
82 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
83 :
84 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
85 :
86 : #if SK5_ENABLED
87 : module function test_getCoreHaloArr_D1_SK5() result(assertion); logical(LK) :: assertion; end function
88 : #endif
89 : #if SK4_ENABLED
90 : module function test_getCoreHaloArr_D1_SK4() result(assertion); logical(LK) :: assertion; end function
91 : #endif
92 : #if SK3_ENABLED
93 : module function test_getCoreHaloArr_D1_SK3() result(assertion); logical(LK) :: assertion; end function
94 : #endif
95 : #if SK2_ENABLED
96 : module function test_getCoreHaloArr_D1_SK2() result(assertion); logical(LK) :: assertion; end function
97 : #endif
98 : #if SK1_ENABLED
99 : module function test_getCoreHaloArr_D1_SK1() result(assertion); logical(LK) :: assertion; end function
100 : #endif
101 :
102 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
103 :
104 : #if IK5_ENABLED
105 : module function test_getCoreHaloArr_D1_IK5() result(assertion); logical(LK) :: assertion; end function
106 : #endif
107 : #if IK4_ENABLED
108 : module function test_getCoreHaloArr_D1_IK4() result(assertion); logical(LK) :: assertion; end function
109 : #endif
110 : #if IK3_ENABLED
111 : module function test_getCoreHaloArr_D1_IK3() result(assertion); logical(LK) :: assertion; end function
112 : #endif
113 : #if IK2_ENABLED
114 : module function test_getCoreHaloArr_D1_IK2() result(assertion); logical(LK) :: assertion; end function
115 : #endif
116 : #if IK1_ENABLED
117 : module function test_getCoreHaloArr_D1_IK1() result(assertion); logical(LK) :: assertion; end function
118 : #endif
119 :
120 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
121 :
122 : #if LK5_ENABLED
123 : module function test_getCoreHaloArr_D1_LK5() result(assertion); logical(LK) :: assertion; end function
124 : #endif
125 : #if LK4_ENABLED
126 : module function test_getCoreHaloArr_D1_LK4() result(assertion); logical(LK) :: assertion; end function
127 : #endif
128 : #if LK3_ENABLED
129 : module function test_getCoreHaloArr_D1_LK3() result(assertion); logical(LK) :: assertion; end function
130 : #endif
131 : #if LK2_ENABLED
132 : module function test_getCoreHaloArr_D1_LK2() result(assertion); logical(LK) :: assertion; end function
133 : #endif
134 : #if LK1_ENABLED
135 : module function test_getCoreHaloArr_D1_LK1() result(assertion); logical(LK) :: assertion; end function
136 : #endif
137 :
138 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
139 :
140 : #if CK5_ENABLED
141 : module function test_getCoreHaloArr_D1_CK5() result(assertion); logical(LK) :: assertion; end function
142 : #endif
143 : #if CK4_ENABLED
144 : module function test_getCoreHaloArr_D1_CK4() result(assertion); logical(LK) :: assertion; end function
145 : #endif
146 : #if CK3_ENABLED
147 : module function test_getCoreHaloArr_D1_CK3() result(assertion); logical(LK) :: assertion; end function
148 : #endif
149 : #if CK2_ENABLED
150 : module function test_getCoreHaloArr_D1_CK2() result(assertion); logical(LK) :: assertion; end function
151 : #endif
152 : #if CK1_ENABLED
153 : module function test_getCoreHaloArr_D1_CK1() result(assertion); logical(LK) :: assertion; end function
154 : #endif
155 :
156 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
157 :
158 : #if RK5_ENABLED
159 : module function test_getCoreHaloArr_D1_RK5() result(assertion); logical(LK) :: assertion; end function
160 : #endif
161 : #if RK4_ENABLED
162 : module function test_getCoreHaloArr_D1_RK4() result(assertion); logical(LK) :: assertion; end function
163 : #endif
164 : #if RK3_ENABLED
165 : module function test_getCoreHaloArr_D1_RK3() result(assertion); logical(LK) :: assertion; end function
166 : #endif
167 : #if RK2_ENABLED
168 : module function test_getCoreHaloArr_D1_RK2() result(assertion); logical(LK) :: assertion; end function
169 : #endif
170 : #if RK1_ENABLED
171 : module function test_getCoreHaloArr_D1_RK1() result(assertion); logical(LK) :: assertion; end function
172 : #endif
173 :
174 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
175 :
176 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
177 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
178 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
179 :
180 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
181 :
182 : #if SK5_ENABLED
183 : module function test_getCoreHaloArr_D2_SK5() result(assertion); logical(LK) :: assertion; end function
184 : #endif
185 : #if SK4_ENABLED
186 : module function test_getCoreHaloArr_D2_SK4() result(assertion); logical(LK) :: assertion; end function
187 : #endif
188 : #if SK3_ENABLED
189 : module function test_getCoreHaloArr_D2_SK3() result(assertion); logical(LK) :: assertion; end function
190 : #endif
191 : #if SK2_ENABLED
192 : module function test_getCoreHaloArr_D2_SK2() result(assertion); logical(LK) :: assertion; end function
193 : #endif
194 : #if SK1_ENABLED
195 : module function test_getCoreHaloArr_D2_SK1() result(assertion); logical(LK) :: assertion; end function
196 : #endif
197 :
198 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
199 :
200 : #if IK5_ENABLED
201 : module function test_getCoreHaloArr_D2_IK5() result(assertion); logical(LK) :: assertion; end function
202 : #endif
203 : #if IK4_ENABLED
204 : module function test_getCoreHaloArr_D2_IK4() result(assertion); logical(LK) :: assertion; end function
205 : #endif
206 : #if IK3_ENABLED
207 : module function test_getCoreHaloArr_D2_IK3() result(assertion); logical(LK) :: assertion; end function
208 : #endif
209 : #if IK2_ENABLED
210 : module function test_getCoreHaloArr_D2_IK2() result(assertion); logical(LK) :: assertion; end function
211 : #endif
212 : #if IK1_ENABLED
213 : module function test_getCoreHaloArr_D2_IK1() result(assertion); logical(LK) :: assertion; end function
214 : #endif
215 :
216 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
217 :
218 : #if LK5_ENABLED
219 : module function test_getCoreHaloArr_D2_LK5() result(assertion); logical(LK) :: assertion; end function
220 : #endif
221 : #if LK4_ENABLED
222 : module function test_getCoreHaloArr_D2_LK4() result(assertion); logical(LK) :: assertion; end function
223 : #endif
224 : #if LK3_ENABLED
225 : module function test_getCoreHaloArr_D2_LK3() result(assertion); logical(LK) :: assertion; end function
226 : #endif
227 : #if LK2_ENABLED
228 : module function test_getCoreHaloArr_D2_LK2() result(assertion); logical(LK) :: assertion; end function
229 : #endif
230 : #if LK1_ENABLED
231 : module function test_getCoreHaloArr_D2_LK1() result(assertion); logical(LK) :: assertion; end function
232 : #endif
233 :
234 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
235 :
236 : #if CK5_ENABLED
237 : module function test_getCoreHaloArr_D2_CK5() result(assertion); logical(LK) :: assertion; end function
238 : #endif
239 : #if CK4_ENABLED
240 : module function test_getCoreHaloArr_D2_CK4() result(assertion); logical(LK) :: assertion; end function
241 : #endif
242 : #if CK3_ENABLED
243 : module function test_getCoreHaloArr_D2_CK3() result(assertion); logical(LK) :: assertion; end function
244 : #endif
245 : #if CK2_ENABLED
246 : module function test_getCoreHaloArr_D2_CK2() result(assertion); logical(LK) :: assertion; end function
247 : #endif
248 : #if CK1_ENABLED
249 : module function test_getCoreHaloArr_D2_CK1() result(assertion); logical(LK) :: assertion; end function
250 : #endif
251 :
252 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
253 :
254 : #if RK5_ENABLED
255 : module function test_getCoreHaloArr_D2_RK5() result(assertion); logical(LK) :: assertion; end function
256 : #endif
257 : #if RK4_ENABLED
258 : module function test_getCoreHaloArr_D2_RK4() result(assertion); logical(LK) :: assertion; end function
259 : #endif
260 : #if RK3_ENABLED
261 : module function test_getCoreHaloArr_D2_RK3() result(assertion); logical(LK) :: assertion; end function
262 : #endif
263 : #if RK2_ENABLED
264 : module function test_getCoreHaloArr_D2_RK2() result(assertion); logical(LK) :: assertion; end function
265 : #endif
266 : #if RK1_ENABLED
267 : module function test_getCoreHaloArr_D2_RK1() result(assertion); logical(LK) :: assertion; end function
268 : #endif
269 :
270 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
271 :
272 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
273 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
274 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
275 :
276 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
277 :
278 : #if SK5_ENABLED
279 : module function test_getCoreHaloArr_D3_SK5() result(assertion); logical(LK) :: assertion; end function
280 : #endif
281 : #if SK4_ENABLED
282 : module function test_getCoreHaloArr_D3_SK4() result(assertion); logical(LK) :: assertion; end function
283 : #endif
284 : #if SK3_ENABLED
285 : module function test_getCoreHaloArr_D3_SK3() result(assertion); logical(LK) :: assertion; end function
286 : #endif
287 : #if SK2_ENABLED
288 : module function test_getCoreHaloArr_D3_SK2() result(assertion); logical(LK) :: assertion; end function
289 : #endif
290 : #if SK1_ENABLED
291 : module function test_getCoreHaloArr_D3_SK1() result(assertion); logical(LK) :: assertion; end function
292 : #endif
293 :
294 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
295 :
296 : #if IK5_ENABLED
297 : module function test_getCoreHaloArr_D3_IK5() result(assertion); logical(LK) :: assertion; end function
298 : #endif
299 : #if IK4_ENABLED
300 : module function test_getCoreHaloArr_D3_IK4() result(assertion); logical(LK) :: assertion; end function
301 : #endif
302 : #if IK3_ENABLED
303 : module function test_getCoreHaloArr_D3_IK3() result(assertion); logical(LK) :: assertion; end function
304 : #endif
305 : #if IK2_ENABLED
306 : module function test_getCoreHaloArr_D3_IK2() result(assertion); logical(LK) :: assertion; end function
307 : #endif
308 : #if IK1_ENABLED
309 : module function test_getCoreHaloArr_D3_IK1() result(assertion); logical(LK) :: assertion; end function
310 : #endif
311 :
312 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
313 :
314 : #if LK5_ENABLED
315 : module function test_getCoreHaloArr_D3_LK5() result(assertion); logical(LK) :: assertion; end function
316 : #endif
317 : #if LK4_ENABLED
318 : module function test_getCoreHaloArr_D3_LK4() result(assertion); logical(LK) :: assertion; end function
319 : #endif
320 : #if LK3_ENABLED
321 : module function test_getCoreHaloArr_D3_LK3() result(assertion); logical(LK) :: assertion; end function
322 : #endif
323 : #if LK2_ENABLED
324 : module function test_getCoreHaloArr_D3_LK2() result(assertion); logical(LK) :: assertion; end function
325 : #endif
326 : #if LK1_ENABLED
327 : module function test_getCoreHaloArr_D3_LK1() result(assertion); logical(LK) :: assertion; end function
328 : #endif
329 :
330 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
331 :
332 : #if CK5_ENABLED
333 : module function test_getCoreHaloArr_D3_CK5() result(assertion); logical(LK) :: assertion; end function
334 : #endif
335 : #if CK4_ENABLED
336 : module function test_getCoreHaloArr_D3_CK4() result(assertion); logical(LK) :: assertion; end function
337 : #endif
338 : #if CK3_ENABLED
339 : module function test_getCoreHaloArr_D3_CK3() result(assertion); logical(LK) :: assertion; end function
340 : #endif
341 : #if CK2_ENABLED
342 : module function test_getCoreHaloArr_D3_CK2() result(assertion); logical(LK) :: assertion; end function
343 : #endif
344 : #if CK1_ENABLED
345 : module function test_getCoreHaloArr_D3_CK1() result(assertion); logical(LK) :: assertion; end function
346 : #endif
347 :
348 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
349 :
350 : #if RK5_ENABLED
351 : module function test_getCoreHaloArr_D3_RK5() result(assertion); logical(LK) :: assertion; end function
352 : #endif
353 : #if RK4_ENABLED
354 : module function test_getCoreHaloArr_D3_RK4() result(assertion); logical(LK) :: assertion; end function
355 : #endif
356 : #if RK3_ENABLED
357 : module function test_getCoreHaloArr_D3_RK3() result(assertion); logical(LK) :: assertion; end function
358 : #endif
359 : #if RK2_ENABLED
360 : module function test_getCoreHaloArr_D3_RK2() result(assertion); logical(LK) :: assertion; end function
361 : #endif
362 : #if RK1_ENABLED
363 : module function test_getCoreHaloArr_D3_RK1() result(assertion); logical(LK) :: assertion; end function
364 : #endif
365 :
366 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
367 :
368 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
369 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
370 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
371 :
372 : end interface
373 :
374 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
375 :
376 : interface
377 :
378 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
379 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
380 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
381 :
382 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
383 :
384 : #if SK5_ENABLED
385 : module function test_setCoreHaloArr_D0_SK5() result(assertion); logical(LK) :: assertion; end function
386 : #endif
387 : #if SK4_ENABLED
388 : module function test_setCoreHaloArr_D0_SK4() result(assertion); logical(LK) :: assertion; end function
389 : #endif
390 : #if SK3_ENABLED
391 : module function test_setCoreHaloArr_D0_SK3() result(assertion); logical(LK) :: assertion; end function
392 : #endif
393 : #if SK2_ENABLED
394 : module function test_setCoreHaloArr_D0_SK2() result(assertion); logical(LK) :: assertion; end function
395 : #endif
396 : #if SK1_ENABLED
397 : module function test_setCoreHaloArr_D0_SK1() result(assertion); logical(LK) :: assertion; end function
398 : #endif
399 :
400 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
401 :
402 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
403 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
404 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
405 :
406 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
407 :
408 : #if SK5_ENABLED
409 : module function test_setCoreHaloArr_D1_SK5() result(assertion); logical(LK) :: assertion; end function
410 : #endif
411 : #if SK4_ENABLED
412 : module function test_setCoreHaloArr_D1_SK4() result(assertion); logical(LK) :: assertion; end function
413 : #endif
414 : #if SK3_ENABLED
415 : module function test_setCoreHaloArr_D1_SK3() result(assertion); logical(LK) :: assertion; end function
416 : #endif
417 : #if SK2_ENABLED
418 : module function test_setCoreHaloArr_D1_SK2() result(assertion); logical(LK) :: assertion; end function
419 : #endif
420 : #if SK1_ENABLED
421 : module function test_setCoreHaloArr_D1_SK1() result(assertion); logical(LK) :: assertion; end function
422 : #endif
423 :
424 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
425 :
426 : #if IK5_ENABLED
427 : module function test_setCoreHaloArr_D1_IK5() result(assertion); logical(LK) :: assertion; end function
428 : #endif
429 : #if IK4_ENABLED
430 : module function test_setCoreHaloArr_D1_IK4() result(assertion); logical(LK) :: assertion; end function
431 : #endif
432 : #if IK3_ENABLED
433 : module function test_setCoreHaloArr_D1_IK3() result(assertion); logical(LK) :: assertion; end function
434 : #endif
435 : #if IK2_ENABLED
436 : module function test_setCoreHaloArr_D1_IK2() result(assertion); logical(LK) :: assertion; end function
437 : #endif
438 : #if IK1_ENABLED
439 : module function test_setCoreHaloArr_D1_IK1() result(assertion); logical(LK) :: assertion; end function
440 : #endif
441 :
442 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
443 :
444 : #if LK5_ENABLED
445 : module function test_setCoreHaloArr_D1_LK5() result(assertion); logical(LK) :: assertion; end function
446 : #endif
447 : #if LK4_ENABLED
448 : module function test_setCoreHaloArr_D1_LK4() result(assertion); logical(LK) :: assertion; end function
449 : #endif
450 : #if LK3_ENABLED
451 : module function test_setCoreHaloArr_D1_LK3() result(assertion); logical(LK) :: assertion; end function
452 : #endif
453 : #if LK2_ENABLED
454 : module function test_setCoreHaloArr_D1_LK2() result(assertion); logical(LK) :: assertion; end function
455 : #endif
456 : #if LK1_ENABLED
457 : module function test_setCoreHaloArr_D1_LK1() result(assertion); logical(LK) :: assertion; end function
458 : #endif
459 :
460 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
461 :
462 : #if CK5_ENABLED
463 : module function test_setCoreHaloArr_D1_CK5() result(assertion); logical(LK) :: assertion; end function
464 : #endif
465 : #if CK4_ENABLED
466 : module function test_setCoreHaloArr_D1_CK4() result(assertion); logical(LK) :: assertion; end function
467 : #endif
468 : #if CK3_ENABLED
469 : module function test_setCoreHaloArr_D1_CK3() result(assertion); logical(LK) :: assertion; end function
470 : #endif
471 : #if CK2_ENABLED
472 : module function test_setCoreHaloArr_D1_CK2() result(assertion); logical(LK) :: assertion; end function
473 : #endif
474 : #if CK1_ENABLED
475 : module function test_setCoreHaloArr_D1_CK1() result(assertion); logical(LK) :: assertion; end function
476 : #endif
477 :
478 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
479 :
480 : #if RK5_ENABLED
481 : module function test_setCoreHaloArr_D1_RK5() result(assertion); logical(LK) :: assertion; end function
482 : #endif
483 : #if RK4_ENABLED
484 : module function test_setCoreHaloArr_D1_RK4() result(assertion); logical(LK) :: assertion; end function
485 : #endif
486 : #if RK3_ENABLED
487 : module function test_setCoreHaloArr_D1_RK3() result(assertion); logical(LK) :: assertion; end function
488 : #endif
489 : #if RK2_ENABLED
490 : module function test_setCoreHaloArr_D1_RK2() result(assertion); logical(LK) :: assertion; end function
491 : #endif
492 : #if RK1_ENABLED
493 : module function test_setCoreHaloArr_D1_RK1() result(assertion); logical(LK) :: assertion; end function
494 : #endif
495 :
496 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
497 :
498 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
499 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
500 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
501 :
502 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
503 :
504 : #if SK5_ENABLED
505 : module function test_setCoreHaloArr_D2_SK5() result(assertion); logical(LK) :: assertion; end function
506 : #endif
507 : #if SK4_ENABLED
508 : module function test_setCoreHaloArr_D2_SK4() result(assertion); logical(LK) :: assertion; end function
509 : #endif
510 : #if SK3_ENABLED
511 : module function test_setCoreHaloArr_D2_SK3() result(assertion); logical(LK) :: assertion; end function
512 : #endif
513 : #if SK2_ENABLED
514 : module function test_setCoreHaloArr_D2_SK2() result(assertion); logical(LK) :: assertion; end function
515 : #endif
516 : #if SK1_ENABLED
517 : module function test_setCoreHaloArr_D2_SK1() result(assertion); logical(LK) :: assertion; end function
518 : #endif
519 :
520 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
521 :
522 : #if IK5_ENABLED
523 : module function test_setCoreHaloArr_D2_IK5() result(assertion); logical(LK) :: assertion; end function
524 : #endif
525 : #if IK4_ENABLED
526 : module function test_setCoreHaloArr_D2_IK4() result(assertion); logical(LK) :: assertion; end function
527 : #endif
528 : #if IK3_ENABLED
529 : module function test_setCoreHaloArr_D2_IK3() result(assertion); logical(LK) :: assertion; end function
530 : #endif
531 : #if IK2_ENABLED
532 : module function test_setCoreHaloArr_D2_IK2() result(assertion); logical(LK) :: assertion; end function
533 : #endif
534 : #if IK1_ENABLED
535 : module function test_setCoreHaloArr_D2_IK1() result(assertion); logical(LK) :: assertion; end function
536 : #endif
537 :
538 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
539 :
540 : #if LK5_ENABLED
541 : module function test_setCoreHaloArr_D2_LK5() result(assertion); logical(LK) :: assertion; end function
542 : #endif
543 : #if LK4_ENABLED
544 : module function test_setCoreHaloArr_D2_LK4() result(assertion); logical(LK) :: assertion; end function
545 : #endif
546 : #if LK3_ENABLED
547 : module function test_setCoreHaloArr_D2_LK3() result(assertion); logical(LK) :: assertion; end function
548 : #endif
549 : #if LK2_ENABLED
550 : module function test_setCoreHaloArr_D2_LK2() result(assertion); logical(LK) :: assertion; end function
551 : #endif
552 : #if LK1_ENABLED
553 : module function test_setCoreHaloArr_D2_LK1() result(assertion); logical(LK) :: assertion; end function
554 : #endif
555 :
556 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
557 :
558 : #if CK5_ENABLED
559 : module function test_setCoreHaloArr_D2_CK5() result(assertion); logical(LK) :: assertion; end function
560 : #endif
561 : #if CK4_ENABLED
562 : module function test_setCoreHaloArr_D2_CK4() result(assertion); logical(LK) :: assertion; end function
563 : #endif
564 : #if CK3_ENABLED
565 : module function test_setCoreHaloArr_D2_CK3() result(assertion); logical(LK) :: assertion; end function
566 : #endif
567 : #if CK2_ENABLED
568 : module function test_setCoreHaloArr_D2_CK2() result(assertion); logical(LK) :: assertion; end function
569 : #endif
570 : #if CK1_ENABLED
571 : module function test_setCoreHaloArr_D2_CK1() result(assertion); logical(LK) :: assertion; end function
572 : #endif
573 :
574 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
575 :
576 : #if RK5_ENABLED
577 : module function test_setCoreHaloArr_D2_RK5() result(assertion); logical(LK) :: assertion; end function
578 : #endif
579 : #if RK4_ENABLED
580 : module function test_setCoreHaloArr_D2_RK4() result(assertion); logical(LK) :: assertion; end function
581 : #endif
582 : #if RK3_ENABLED
583 : module function test_setCoreHaloArr_D2_RK3() result(assertion); logical(LK) :: assertion; end function
584 : #endif
585 : #if RK2_ENABLED
586 : module function test_setCoreHaloArr_D2_RK2() result(assertion); logical(LK) :: assertion; end function
587 : #endif
588 : #if RK1_ENABLED
589 : module function test_setCoreHaloArr_D2_RK1() result(assertion); logical(LK) :: assertion; end function
590 : #endif
591 :
592 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
593 :
594 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
595 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
596 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
597 :
598 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
599 :
600 : #if SK5_ENABLED
601 : module function test_setCoreHaloArr_D3_SK5() result(assertion); logical(LK) :: assertion; end function
602 : #endif
603 : #if SK4_ENABLED
604 : module function test_setCoreHaloArr_D3_SK4() result(assertion); logical(LK) :: assertion; end function
605 : #endif
606 : #if SK3_ENABLED
607 : module function test_setCoreHaloArr_D3_SK3() result(assertion); logical(LK) :: assertion; end function
608 : #endif
609 : #if SK2_ENABLED
610 : module function test_setCoreHaloArr_D3_SK2() result(assertion); logical(LK) :: assertion; end function
611 : #endif
612 : #if SK1_ENABLED
613 : module function test_setCoreHaloArr_D3_SK1() result(assertion); logical(LK) :: assertion; end function
614 : #endif
615 :
616 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
617 :
618 : #if IK5_ENABLED
619 : module function test_setCoreHaloArr_D3_IK5() result(assertion); logical(LK) :: assertion; end function
620 : #endif
621 : #if IK4_ENABLED
622 : module function test_setCoreHaloArr_D3_IK4() result(assertion); logical(LK) :: assertion; end function
623 : #endif
624 : #if IK3_ENABLED
625 : module function test_setCoreHaloArr_D3_IK3() result(assertion); logical(LK) :: assertion; end function
626 : #endif
627 : #if IK2_ENABLED
628 : module function test_setCoreHaloArr_D3_IK2() result(assertion); logical(LK) :: assertion; end function
629 : #endif
630 : #if IK1_ENABLED
631 : module function test_setCoreHaloArr_D3_IK1() result(assertion); logical(LK) :: assertion; end function
632 : #endif
633 :
634 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
635 :
636 : #if LK5_ENABLED
637 : module function test_setCoreHaloArr_D3_LK5() result(assertion); logical(LK) :: assertion; end function
638 : #endif
639 : #if LK4_ENABLED
640 : module function test_setCoreHaloArr_D3_LK4() result(assertion); logical(LK) :: assertion; end function
641 : #endif
642 : #if LK3_ENABLED
643 : module function test_setCoreHaloArr_D3_LK3() result(assertion); logical(LK) :: assertion; end function
644 : #endif
645 : #if LK2_ENABLED
646 : module function test_setCoreHaloArr_D3_LK2() result(assertion); logical(LK) :: assertion; end function
647 : #endif
648 : #if LK1_ENABLED
649 : module function test_setCoreHaloArr_D3_LK1() result(assertion); logical(LK) :: assertion; end function
650 : #endif
651 :
652 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
653 :
654 : #if CK5_ENABLED
655 : module function test_setCoreHaloArr_D3_CK5() result(assertion); logical(LK) :: assertion; end function
656 : #endif
657 : #if CK4_ENABLED
658 : module function test_setCoreHaloArr_D3_CK4() result(assertion); logical(LK) :: assertion; end function
659 : #endif
660 : #if CK3_ENABLED
661 : module function test_setCoreHaloArr_D3_CK3() result(assertion); logical(LK) :: assertion; end function
662 : #endif
663 : #if CK2_ENABLED
664 : module function test_setCoreHaloArr_D3_CK2() result(assertion); logical(LK) :: assertion; end function
665 : #endif
666 : #if CK1_ENABLED
667 : module function test_setCoreHaloArr_D3_CK1() result(assertion); logical(LK) :: assertion; end function
668 : #endif
669 :
670 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
671 :
672 : #if RK5_ENABLED
673 : module function test_setCoreHaloArr_D3_RK5() result(assertion); logical(LK) :: assertion; end function
674 : #endif
675 : #if RK4_ENABLED
676 : module function test_setCoreHaloArr_D3_RK4() result(assertion); logical(LK) :: assertion; end function
677 : #endif
678 : #if RK3_ENABLED
679 : module function test_setCoreHaloArr_D3_RK3() result(assertion); logical(LK) :: assertion; end function
680 : #endif
681 : #if RK2_ENABLED
682 : module function test_setCoreHaloArr_D3_RK2() result(assertion); logical(LK) :: assertion; end function
683 : #endif
684 : #if RK1_ENABLED
685 : module function test_setCoreHaloArr_D3_RK1() result(assertion); logical(LK) :: assertion; end function
686 : #endif
687 :
688 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
689 :
690 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
691 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
692 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
693 :
694 : end interface
695 :
696 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
697 :
698 : interface
699 :
700 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
701 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
702 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
703 :
704 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
705 :
706 : #if SK5_ENABLED
707 : module function test_setCoreHaloSca_D0_SK5() result(assertion); logical(LK) :: assertion; end function
708 : #endif
709 : #if SK4_ENABLED
710 : module function test_setCoreHaloSca_D0_SK4() result(assertion); logical(LK) :: assertion; end function
711 : #endif
712 : #if SK3_ENABLED
713 : module function test_setCoreHaloSca_D0_SK3() result(assertion); logical(LK) :: assertion; end function
714 : #endif
715 : #if SK2_ENABLED
716 : module function test_setCoreHaloSca_D0_SK2() result(assertion); logical(LK) :: assertion; end function
717 : #endif
718 : #if SK1_ENABLED
719 : module function test_setCoreHaloSca_D0_SK1() result(assertion); logical(LK) :: assertion; end function
720 : #endif
721 :
722 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
723 :
724 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
725 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
726 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
727 :
728 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
729 :
730 : #if SK5_ENABLED
731 : module function test_setCoreHaloSca_D1_SK5() result(assertion); logical(LK) :: assertion; end function
732 : #endif
733 : #if SK4_ENABLED
734 : module function test_setCoreHaloSca_D1_SK4() result(assertion); logical(LK) :: assertion; end function
735 : #endif
736 : #if SK3_ENABLED
737 : module function test_setCoreHaloSca_D1_SK3() result(assertion); logical(LK) :: assertion; end function
738 : #endif
739 : #if SK2_ENABLED
740 : module function test_setCoreHaloSca_D1_SK2() result(assertion); logical(LK) :: assertion; end function
741 : #endif
742 : #if SK1_ENABLED
743 : module function test_setCoreHaloSca_D1_SK1() result(assertion); logical(LK) :: assertion; end function
744 : #endif
745 :
746 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
747 :
748 : #if IK5_ENABLED
749 : module function test_setCoreHaloSca_D1_IK5() result(assertion); logical(LK) :: assertion; end function
750 : #endif
751 : #if IK4_ENABLED
752 : module function test_setCoreHaloSca_D1_IK4() result(assertion); logical(LK) :: assertion; end function
753 : #endif
754 : #if IK3_ENABLED
755 : module function test_setCoreHaloSca_D1_IK3() result(assertion); logical(LK) :: assertion; end function
756 : #endif
757 : #if IK2_ENABLED
758 : module function test_setCoreHaloSca_D1_IK2() result(assertion); logical(LK) :: assertion; end function
759 : #endif
760 : #if IK1_ENABLED
761 : module function test_setCoreHaloSca_D1_IK1() result(assertion); logical(LK) :: assertion; end function
762 : #endif
763 :
764 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
765 :
766 : #if LK5_ENABLED
767 : module function test_setCoreHaloSca_D1_LK5() result(assertion); logical(LK) :: assertion; end function
768 : #endif
769 : #if LK4_ENABLED
770 : module function test_setCoreHaloSca_D1_LK4() result(assertion); logical(LK) :: assertion; end function
771 : #endif
772 : #if LK3_ENABLED
773 : module function test_setCoreHaloSca_D1_LK3() result(assertion); logical(LK) :: assertion; end function
774 : #endif
775 : #if LK2_ENABLED
776 : module function test_setCoreHaloSca_D1_LK2() result(assertion); logical(LK) :: assertion; end function
777 : #endif
778 : #if LK1_ENABLED
779 : module function test_setCoreHaloSca_D1_LK1() result(assertion); logical(LK) :: assertion; end function
780 : #endif
781 :
782 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
783 :
784 : #if CK5_ENABLED
785 : module function test_setCoreHaloSca_D1_CK5() result(assertion); logical(LK) :: assertion; end function
786 : #endif
787 : #if CK4_ENABLED
788 : module function test_setCoreHaloSca_D1_CK4() result(assertion); logical(LK) :: assertion; end function
789 : #endif
790 : #if CK3_ENABLED
791 : module function test_setCoreHaloSca_D1_CK3() result(assertion); logical(LK) :: assertion; end function
792 : #endif
793 : #if CK2_ENABLED
794 : module function test_setCoreHaloSca_D1_CK2() result(assertion); logical(LK) :: assertion; end function
795 : #endif
796 : #if CK1_ENABLED
797 : module function test_setCoreHaloSca_D1_CK1() result(assertion); logical(LK) :: assertion; end function
798 : #endif
799 :
800 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
801 :
802 : #if RK5_ENABLED
803 : module function test_setCoreHaloSca_D1_RK5() result(assertion); logical(LK) :: assertion; end function
804 : #endif
805 : #if RK4_ENABLED
806 : module function test_setCoreHaloSca_D1_RK4() result(assertion); logical(LK) :: assertion; end function
807 : #endif
808 : #if RK3_ENABLED
809 : module function test_setCoreHaloSca_D1_RK3() result(assertion); logical(LK) :: assertion; end function
810 : #endif
811 : #if RK2_ENABLED
812 : module function test_setCoreHaloSca_D1_RK2() result(assertion); logical(LK) :: assertion; end function
813 : #endif
814 : #if RK1_ENABLED
815 : module function test_setCoreHaloSca_D1_RK1() result(assertion); logical(LK) :: assertion; end function
816 : #endif
817 :
818 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
819 :
820 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
821 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
822 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
823 :
824 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
825 :
826 : #if SK5_ENABLED
827 : module function test_setCoreHaloSca_D2_SK5() result(assertion); logical(LK) :: assertion; end function
828 : #endif
829 : #if SK4_ENABLED
830 : module function test_setCoreHaloSca_D2_SK4() result(assertion); logical(LK) :: assertion; end function
831 : #endif
832 : #if SK3_ENABLED
833 : module function test_setCoreHaloSca_D2_SK3() result(assertion); logical(LK) :: assertion; end function
834 : #endif
835 : #if SK2_ENABLED
836 : module function test_setCoreHaloSca_D2_SK2() result(assertion); logical(LK) :: assertion; end function
837 : #endif
838 : #if SK1_ENABLED
839 : module function test_setCoreHaloSca_D2_SK1() result(assertion); logical(LK) :: assertion; end function
840 : #endif
841 :
842 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
843 :
844 : #if IK5_ENABLED
845 : module function test_setCoreHaloSca_D2_IK5() result(assertion); logical(LK) :: assertion; end function
846 : #endif
847 : #if IK4_ENABLED
848 : module function test_setCoreHaloSca_D2_IK4() result(assertion); logical(LK) :: assertion; end function
849 : #endif
850 : #if IK3_ENABLED
851 : module function test_setCoreHaloSca_D2_IK3() result(assertion); logical(LK) :: assertion; end function
852 : #endif
853 : #if IK2_ENABLED
854 : module function test_setCoreHaloSca_D2_IK2() result(assertion); logical(LK) :: assertion; end function
855 : #endif
856 : #if IK1_ENABLED
857 : module function test_setCoreHaloSca_D2_IK1() result(assertion); logical(LK) :: assertion; end function
858 : #endif
859 :
860 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
861 :
862 : #if LK5_ENABLED
863 : module function test_setCoreHaloSca_D2_LK5() result(assertion); logical(LK) :: assertion; end function
864 : #endif
865 : #if LK4_ENABLED
866 : module function test_setCoreHaloSca_D2_LK4() result(assertion); logical(LK) :: assertion; end function
867 : #endif
868 : #if LK3_ENABLED
869 : module function test_setCoreHaloSca_D2_LK3() result(assertion); logical(LK) :: assertion; end function
870 : #endif
871 : #if LK2_ENABLED
872 : module function test_setCoreHaloSca_D2_LK2() result(assertion); logical(LK) :: assertion; end function
873 : #endif
874 : #if LK1_ENABLED
875 : module function test_setCoreHaloSca_D2_LK1() result(assertion); logical(LK) :: assertion; end function
876 : #endif
877 :
878 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
879 :
880 : #if CK5_ENABLED
881 : module function test_setCoreHaloSca_D2_CK5() result(assertion); logical(LK) :: assertion; end function
882 : #endif
883 : #if CK4_ENABLED
884 : module function test_setCoreHaloSca_D2_CK4() result(assertion); logical(LK) :: assertion; end function
885 : #endif
886 : #if CK3_ENABLED
887 : module function test_setCoreHaloSca_D2_CK3() result(assertion); logical(LK) :: assertion; end function
888 : #endif
889 : #if CK2_ENABLED
890 : module function test_setCoreHaloSca_D2_CK2() result(assertion); logical(LK) :: assertion; end function
891 : #endif
892 : #if CK1_ENABLED
893 : module function test_setCoreHaloSca_D2_CK1() result(assertion); logical(LK) :: assertion; end function
894 : #endif
895 :
896 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
897 :
898 : #if RK5_ENABLED
899 : module function test_setCoreHaloSca_D2_RK5() result(assertion); logical(LK) :: assertion; end function
900 : #endif
901 : #if RK4_ENABLED
902 : module function test_setCoreHaloSca_D2_RK4() result(assertion); logical(LK) :: assertion; end function
903 : #endif
904 : #if RK3_ENABLED
905 : module function test_setCoreHaloSca_D2_RK3() result(assertion); logical(LK) :: assertion; end function
906 : #endif
907 : #if RK2_ENABLED
908 : module function test_setCoreHaloSca_D2_RK2() result(assertion); logical(LK) :: assertion; end function
909 : #endif
910 : #if RK1_ENABLED
911 : module function test_setCoreHaloSca_D2_RK1() result(assertion); logical(LK) :: assertion; end function
912 : #endif
913 :
914 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
915 :
916 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
917 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
918 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
919 :
920 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
921 :
922 : #if SK5_ENABLED
923 : module function test_setCoreHaloSca_D3_SK5() result(assertion); logical(LK) :: assertion; end function
924 : #endif
925 : #if SK4_ENABLED
926 : module function test_setCoreHaloSca_D3_SK4() result(assertion); logical(LK) :: assertion; end function
927 : #endif
928 : #if SK3_ENABLED
929 : module function test_setCoreHaloSca_D3_SK3() result(assertion); logical(LK) :: assertion; end function
930 : #endif
931 : #if SK2_ENABLED
932 : module function test_setCoreHaloSca_D3_SK2() result(assertion); logical(LK) :: assertion; end function
933 : #endif
934 : #if SK1_ENABLED
935 : module function test_setCoreHaloSca_D3_SK1() result(assertion); logical(LK) :: assertion; end function
936 : #endif
937 :
938 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
939 :
940 : #if IK5_ENABLED
941 : module function test_setCoreHaloSca_D3_IK5() result(assertion); logical(LK) :: assertion; end function
942 : #endif
943 : #if IK4_ENABLED
944 : module function test_setCoreHaloSca_D3_IK4() result(assertion); logical(LK) :: assertion; end function
945 : #endif
946 : #if IK3_ENABLED
947 : module function test_setCoreHaloSca_D3_IK3() result(assertion); logical(LK) :: assertion; end function
948 : #endif
949 : #if IK2_ENABLED
950 : module function test_setCoreHaloSca_D3_IK2() result(assertion); logical(LK) :: assertion; end function
951 : #endif
952 : #if IK1_ENABLED
953 : module function test_setCoreHaloSca_D3_IK1() result(assertion); logical(LK) :: assertion; end function
954 : #endif
955 :
956 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
957 :
958 : #if LK5_ENABLED
959 : module function test_setCoreHaloSca_D3_LK5() result(assertion); logical(LK) :: assertion; end function
960 : #endif
961 : #if LK4_ENABLED
962 : module function test_setCoreHaloSca_D3_LK4() result(assertion); logical(LK) :: assertion; end function
963 : #endif
964 : #if LK3_ENABLED
965 : module function test_setCoreHaloSca_D3_LK3() result(assertion); logical(LK) :: assertion; end function
966 : #endif
967 : #if LK2_ENABLED
968 : module function test_setCoreHaloSca_D3_LK2() result(assertion); logical(LK) :: assertion; end function
969 : #endif
970 : #if LK1_ENABLED
971 : module function test_setCoreHaloSca_D3_LK1() result(assertion); logical(LK) :: assertion; end function
972 : #endif
973 :
974 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
975 :
976 : #if CK5_ENABLED
977 : module function test_setCoreHaloSca_D3_CK5() result(assertion); logical(LK) :: assertion; end function
978 : #endif
979 : #if CK4_ENABLED
980 : module function test_setCoreHaloSca_D3_CK4() result(assertion); logical(LK) :: assertion; end function
981 : #endif
982 : #if CK3_ENABLED
983 : module function test_setCoreHaloSca_D3_CK3() result(assertion); logical(LK) :: assertion; end function
984 : #endif
985 : #if CK2_ENABLED
986 : module function test_setCoreHaloSca_D3_CK2() result(assertion); logical(LK) :: assertion; end function
987 : #endif
988 : #if CK1_ENABLED
989 : module function test_setCoreHaloSca_D3_CK1() result(assertion); logical(LK) :: assertion; end function
990 : #endif
991 :
992 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
993 :
994 : #if RK5_ENABLED
995 : module function test_setCoreHaloSca_D3_RK5() result(assertion); logical(LK) :: assertion; end function
996 : #endif
997 : #if RK4_ENABLED
998 : module function test_setCoreHaloSca_D3_RK4() result(assertion); logical(LK) :: assertion; end function
999 : #endif
1000 : #if RK3_ENABLED
1001 : module function test_setCoreHaloSca_D3_RK3() result(assertion); logical(LK) :: assertion; end function
1002 : #endif
1003 : #if RK2_ENABLED
1004 : module function test_setCoreHaloSca_D3_RK2() result(assertion); logical(LK) :: assertion; end function
1005 : #endif
1006 : #if RK1_ENABLED
1007 : module function test_setCoreHaloSca_D3_RK1() result(assertion); logical(LK) :: assertion; end function
1008 : #endif
1009 :
1010 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1011 :
1012 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1013 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1014 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1015 :
1016 : end interface
1017 :
1018 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1019 :
1020 : contains
1021 :
1022 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1023 :
1024 1 : subroutine setTest()
1025 :
1026 1 : test = test_type(MODULE_NAME)
1027 :
1028 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1029 :
1030 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1031 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1032 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1033 :
1034 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1035 :
1036 : #if SK5_ENABLED
1037 : call test%run(test_getCoreHaloArr_D0_SK5, SK_"test_getCoreHaloArr_D0_SK5")
1038 : #endif
1039 : #if SK4_ENABLED
1040 : call test%run(test_getCoreHaloArr_D0_SK4, SK_"test_getCoreHaloArr_D0_SK4")
1041 : #endif
1042 : #if SK3_ENABLED
1043 : call test%run(test_getCoreHaloArr_D0_SK3, SK_"test_getCoreHaloArr_D0_SK3")
1044 : #endif
1045 : #if SK2_ENABLED
1046 : call test%run(test_getCoreHaloArr_D0_SK2, SK_"test_getCoreHaloArr_D0_SK2")
1047 : #endif
1048 : #if SK1_ENABLED
1049 1 : call test%run(test_getCoreHaloArr_D0_SK1, SK_"test_getCoreHaloArr_D0_SK1")
1050 : #endif
1051 :
1052 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1053 :
1054 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1055 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1056 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1057 :
1058 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1059 :
1060 : #if SK5_ENABLED
1061 : call test%run(test_getCoreHaloArr_D1_SK5, SK_"test_getCoreHaloArr_D1_SK5")
1062 : #endif
1063 : #if SK4_ENABLED
1064 : call test%run(test_getCoreHaloArr_D1_SK4, SK_"test_getCoreHaloArr_D1_SK4")
1065 : #endif
1066 : #if SK3_ENABLED
1067 : call test%run(test_getCoreHaloArr_D1_SK3, SK_"test_getCoreHaloArr_D1_SK3")
1068 : #endif
1069 : #if SK2_ENABLED
1070 : call test%run(test_getCoreHaloArr_D1_SK2, SK_"test_getCoreHaloArr_D1_SK2")
1071 : #endif
1072 : #if SK1_ENABLED
1073 1 : call test%run(test_getCoreHaloArr_D1_SK1, SK_"test_getCoreHaloArr_D1_SK1")
1074 : #endif
1075 :
1076 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1077 :
1078 : #if IK5_ENABLED
1079 1 : call test%run(test_getCoreHaloArr_D1_IK5, SK_"test_getCoreHaloArr_D1_IK5")
1080 : #endif
1081 : #if IK4_ENABLED
1082 1 : call test%run(test_getCoreHaloArr_D1_IK4, SK_"test_getCoreHaloArr_D1_IK4")
1083 : #endif
1084 : #if IK3_ENABLED
1085 1 : call test%run(test_getCoreHaloArr_D1_IK3, SK_"test_getCoreHaloArr_D1_IK3")
1086 : #endif
1087 : #if IK2_ENABLED
1088 1 : call test%run(test_getCoreHaloArr_D1_IK2, SK_"test_getCoreHaloArr_D1_IK2")
1089 : #endif
1090 : #if IK1_ENABLED
1091 1 : call test%run(test_getCoreHaloArr_D1_IK1, SK_"test_getCoreHaloArr_D1_IK1")
1092 : #endif
1093 :
1094 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1095 :
1096 : #if LK5_ENABLED
1097 1 : call test%run(test_getCoreHaloArr_D1_LK5, SK_"test_getCoreHaloArr_D1_LK5")
1098 : #endif
1099 : #if LK4_ENABLED
1100 1 : call test%run(test_getCoreHaloArr_D1_LK4, SK_"test_getCoreHaloArr_D1_LK4")
1101 : #endif
1102 : #if LK3_ENABLED
1103 1 : call test%run(test_getCoreHaloArr_D1_LK3, SK_"test_getCoreHaloArr_D1_LK3")
1104 : #endif
1105 : #if LK2_ENABLED
1106 1 : call test%run(test_getCoreHaloArr_D1_LK2, SK_"test_getCoreHaloArr_D1_LK2")
1107 : #endif
1108 : #if LK1_ENABLED
1109 1 : call test%run(test_getCoreHaloArr_D1_LK1, SK_"test_getCoreHaloArr_D1_LK1")
1110 : #endif
1111 :
1112 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1113 :
1114 : #if CK5_ENABLED
1115 : call test%run(test_getCoreHaloArr_D1_CK5, SK_"test_getCoreHaloArr_D1_CK5")
1116 : #endif
1117 : #if CK4_ENABLED
1118 1 : call test%run(test_getCoreHaloArr_D1_CK4, SK_"test_getCoreHaloArr_D1_CK4")
1119 : #endif
1120 : #if CK3_ENABLED
1121 1 : call test%run(test_getCoreHaloArr_D1_CK3, SK_"test_getCoreHaloArr_D1_CK3")
1122 : #endif
1123 : #if CK2_ENABLED
1124 1 : call test%run(test_getCoreHaloArr_D1_CK2, SK_"test_getCoreHaloArr_D1_CK2")
1125 : #endif
1126 : #if CK1_ENABLED
1127 1 : call test%run(test_getCoreHaloArr_D1_CK1, SK_"test_getCoreHaloArr_D1_CK1")
1128 : #endif
1129 :
1130 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1131 :
1132 : #if RK5_ENABLED
1133 : call test%run(test_getCoreHaloArr_D1_RK5, SK_"test_getCoreHaloArr_D1_RK5")
1134 : #endif
1135 : #if RK4_ENABLED
1136 1 : call test%run(test_getCoreHaloArr_D1_RK4, SK_"test_getCoreHaloArr_D1_RK4")
1137 : #endif
1138 : #if RK3_ENABLED
1139 1 : call test%run(test_getCoreHaloArr_D1_RK3, SK_"test_getCoreHaloArr_D1_RK3")
1140 : #endif
1141 : #if RK2_ENABLED
1142 1 : call test%run(test_getCoreHaloArr_D1_RK2, SK_"test_getCoreHaloArr_D1_RK2")
1143 : #endif
1144 : #if RK1_ENABLED
1145 1 : call test%run(test_getCoreHaloArr_D1_RK1, SK_"test_getCoreHaloArr_D1_RK1")
1146 : #endif
1147 :
1148 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1149 :
1150 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1151 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1152 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1153 :
1154 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1155 :
1156 : #if SK5_ENABLED
1157 : call test%run(test_getCoreHaloArr_D2_SK5, SK_"test_getCoreHaloArr_D2_SK5")
1158 : #endif
1159 : #if SK4_ENABLED
1160 : call test%run(test_getCoreHaloArr_D2_SK4, SK_"test_getCoreHaloArr_D2_SK4")
1161 : #endif
1162 : #if SK3_ENABLED
1163 : call test%run(test_getCoreHaloArr_D2_SK3, SK_"test_getCoreHaloArr_D2_SK3")
1164 : #endif
1165 : #if SK2_ENABLED
1166 : call test%run(test_getCoreHaloArr_D2_SK2, SK_"test_getCoreHaloArr_D2_SK2")
1167 : #endif
1168 : #if SK1_ENABLED
1169 1 : call test%run(test_getCoreHaloArr_D2_SK1, SK_"test_getCoreHaloArr_D2_SK1")
1170 : #endif
1171 :
1172 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1173 :
1174 : #if IK5_ENABLED
1175 1 : call test%run(test_getCoreHaloArr_D2_IK5, SK_"test_getCoreHaloArr_D2_IK5")
1176 : #endif
1177 : #if IK4_ENABLED
1178 1 : call test%run(test_getCoreHaloArr_D2_IK4, SK_"test_getCoreHaloArr_D2_IK4")
1179 : #endif
1180 : #if IK3_ENABLED
1181 1 : call test%run(test_getCoreHaloArr_D2_IK3, SK_"test_getCoreHaloArr_D2_IK3")
1182 : #endif
1183 : #if IK2_ENABLED
1184 1 : call test%run(test_getCoreHaloArr_D2_IK2, SK_"test_getCoreHaloArr_D2_IK2")
1185 : #endif
1186 : #if IK1_ENABLED
1187 1 : call test%run(test_getCoreHaloArr_D2_IK1, SK_"test_getCoreHaloArr_D2_IK1")
1188 : #endif
1189 :
1190 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1191 :
1192 : #if LK5_ENABLED
1193 1 : call test%run(test_getCoreHaloArr_D2_LK5, SK_"test_getCoreHaloArr_D2_LK5")
1194 : #endif
1195 : #if LK4_ENABLED
1196 1 : call test%run(test_getCoreHaloArr_D2_LK4, SK_"test_getCoreHaloArr_D2_LK4")
1197 : #endif
1198 : #if LK3_ENABLED
1199 1 : call test%run(test_getCoreHaloArr_D2_LK3, SK_"test_getCoreHaloArr_D2_LK3")
1200 : #endif
1201 : #if LK2_ENABLED
1202 1 : call test%run(test_getCoreHaloArr_D2_LK2, SK_"test_getCoreHaloArr_D2_LK2")
1203 : #endif
1204 : #if LK1_ENABLED
1205 1 : call test%run(test_getCoreHaloArr_D2_LK1, SK_"test_getCoreHaloArr_D2_LK1")
1206 : #endif
1207 :
1208 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1209 :
1210 : #if CK5_ENABLED
1211 : call test%run(test_getCoreHaloArr_D2_CK5, SK_"test_getCoreHaloArr_D2_CK5")
1212 : #endif
1213 : #if CK4_ENABLED
1214 1 : call test%run(test_getCoreHaloArr_D2_CK4, SK_"test_getCoreHaloArr_D2_CK4")
1215 : #endif
1216 : #if CK3_ENABLED
1217 1 : call test%run(test_getCoreHaloArr_D2_CK3, SK_"test_getCoreHaloArr_D2_CK3")
1218 : #endif
1219 : #if CK2_ENABLED
1220 1 : call test%run(test_getCoreHaloArr_D2_CK2, SK_"test_getCoreHaloArr_D2_CK2")
1221 : #endif
1222 : #if CK1_ENABLED
1223 1 : call test%run(test_getCoreHaloArr_D2_CK1, SK_"test_getCoreHaloArr_D2_CK1")
1224 : #endif
1225 :
1226 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1227 :
1228 : #if RK5_ENABLED
1229 : call test%run(test_getCoreHaloArr_D2_RK5, SK_"test_getCoreHaloArr_D2_RK5")
1230 : #endif
1231 : #if RK4_ENABLED
1232 1 : call test%run(test_getCoreHaloArr_D2_RK4, SK_"test_getCoreHaloArr_D2_RK4")
1233 : #endif
1234 : #if RK3_ENABLED
1235 1 : call test%run(test_getCoreHaloArr_D2_RK3, SK_"test_getCoreHaloArr_D2_RK3")
1236 : #endif
1237 : #if RK2_ENABLED
1238 1 : call test%run(test_getCoreHaloArr_D2_RK2, SK_"test_getCoreHaloArr_D2_RK2")
1239 : #endif
1240 : #if RK1_ENABLED
1241 1 : call test%run(test_getCoreHaloArr_D2_RK1, SK_"test_getCoreHaloArr_D2_RK1")
1242 : #endif
1243 :
1244 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1245 :
1246 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1247 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1248 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1249 :
1250 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1251 :
1252 : #if SK5_ENABLED
1253 : call test%run(test_getCoreHaloArr_D3_SK5, SK_"test_getCoreHaloArr_D3_SK5")
1254 : #endif
1255 : #if SK4_ENABLED
1256 : call test%run(test_getCoreHaloArr_D3_SK4, SK_"test_getCoreHaloArr_D3_SK4")
1257 : #endif
1258 : #if SK3_ENABLED
1259 : call test%run(test_getCoreHaloArr_D3_SK3, SK_"test_getCoreHaloArr_D3_SK3")
1260 : #endif
1261 : #if SK2_ENABLED
1262 : call test%run(test_getCoreHaloArr_D3_SK2, SK_"test_getCoreHaloArr_D3_SK2")
1263 : #endif
1264 : #if SK1_ENABLED
1265 1 : call test%run(test_getCoreHaloArr_D3_SK1, SK_"test_getCoreHaloArr_D3_SK1")
1266 : #endif
1267 :
1268 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1269 :
1270 : #if IK5_ENABLED
1271 1 : call test%run(test_getCoreHaloArr_D3_IK5, SK_"test_getCoreHaloArr_D3_IK5")
1272 : #endif
1273 : #if IK4_ENABLED
1274 1 : call test%run(test_getCoreHaloArr_D3_IK4, SK_"test_getCoreHaloArr_D3_IK4")
1275 : #endif
1276 : #if IK3_ENABLED
1277 1 : call test%run(test_getCoreHaloArr_D3_IK3, SK_"test_getCoreHaloArr_D3_IK3")
1278 : #endif
1279 : #if IK2_ENABLED
1280 1 : call test%run(test_getCoreHaloArr_D3_IK2, SK_"test_getCoreHaloArr_D3_IK2")
1281 : #endif
1282 : #if IK1_ENABLED
1283 1 : call test%run(test_getCoreHaloArr_D3_IK1, SK_"test_getCoreHaloArr_D3_IK1")
1284 : #endif
1285 :
1286 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1287 :
1288 : #if LK5_ENABLED
1289 1 : call test%run(test_getCoreHaloArr_D3_LK5, SK_"test_getCoreHaloArr_D3_LK5")
1290 : #endif
1291 : #if LK4_ENABLED
1292 1 : call test%run(test_getCoreHaloArr_D3_LK4, SK_"test_getCoreHaloArr_D3_LK4")
1293 : #endif
1294 : #if LK3_ENABLED
1295 1 : call test%run(test_getCoreHaloArr_D3_LK3, SK_"test_getCoreHaloArr_D3_LK3")
1296 : #endif
1297 : #if LK2_ENABLED
1298 1 : call test%run(test_getCoreHaloArr_D3_LK2, SK_"test_getCoreHaloArr_D3_LK2")
1299 : #endif
1300 : #if LK1_ENABLED
1301 1 : call test%run(test_getCoreHaloArr_D3_LK1, SK_"test_getCoreHaloArr_D3_LK1")
1302 : #endif
1303 :
1304 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1305 :
1306 : #if CK5_ENABLED
1307 : call test%run(test_getCoreHaloArr_D3_CK5, SK_"test_getCoreHaloArr_D3_CK5")
1308 : #endif
1309 : #if CK4_ENABLED
1310 1 : call test%run(test_getCoreHaloArr_D3_CK4, SK_"test_getCoreHaloArr_D3_CK4")
1311 : #endif
1312 : #if CK3_ENABLED
1313 1 : call test%run(test_getCoreHaloArr_D3_CK3, SK_"test_getCoreHaloArr_D3_CK3")
1314 : #endif
1315 : #if CK2_ENABLED
1316 1 : call test%run(test_getCoreHaloArr_D3_CK2, SK_"test_getCoreHaloArr_D3_CK2")
1317 : #endif
1318 : #if CK1_ENABLED
1319 1 : call test%run(test_getCoreHaloArr_D3_CK1, SK_"test_getCoreHaloArr_D3_CK1")
1320 : #endif
1321 :
1322 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1323 :
1324 : #if RK5_ENABLED
1325 : call test%run(test_getCoreHaloArr_D3_RK5, SK_"test_getCoreHaloArr_D3_RK5")
1326 : #endif
1327 : #if RK4_ENABLED
1328 1 : call test%run(test_getCoreHaloArr_D3_RK4, SK_"test_getCoreHaloArr_D3_RK4")
1329 : #endif
1330 : #if RK3_ENABLED
1331 1 : call test%run(test_getCoreHaloArr_D3_RK3, SK_"test_getCoreHaloArr_D3_RK3")
1332 : #endif
1333 : #if RK2_ENABLED
1334 1 : call test%run(test_getCoreHaloArr_D3_RK2, SK_"test_getCoreHaloArr_D3_RK2")
1335 : #endif
1336 : #if RK1_ENABLED
1337 1 : call test%run(test_getCoreHaloArr_D3_RK1, SK_"test_getCoreHaloArr_D3_RK1")
1338 : #endif
1339 :
1340 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1341 :
1342 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1343 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1344 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1345 :
1346 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1347 :
1348 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1349 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1350 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1351 :
1352 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1353 :
1354 : #if SK5_ENABLED
1355 : call test%run(test_setCoreHaloArr_D0_SK5, SK_"test_setCoreHaloArr_D0_SK5")
1356 : #endif
1357 : #if SK4_ENABLED
1358 : call test%run(test_setCoreHaloArr_D0_SK4, SK_"test_setCoreHaloArr_D0_SK4")
1359 : #endif
1360 : #if SK3_ENABLED
1361 : call test%run(test_setCoreHaloArr_D0_SK3, SK_"test_setCoreHaloArr_D0_SK3")
1362 : #endif
1363 : #if SK2_ENABLED
1364 : call test%run(test_setCoreHaloArr_D0_SK2, SK_"test_setCoreHaloArr_D0_SK2")
1365 : #endif
1366 : #if SK1_ENABLED
1367 1 : call test%run(test_setCoreHaloArr_D0_SK1, SK_"test_setCoreHaloArr_D0_SK1")
1368 : #endif
1369 :
1370 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1371 :
1372 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1373 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1374 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1375 :
1376 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1377 :
1378 : #if SK5_ENABLED
1379 : call test%run(test_setCoreHaloArr_D1_SK5, SK_"test_setCoreHaloArr_D1_SK5")
1380 : #endif
1381 : #if SK4_ENABLED
1382 : call test%run(test_setCoreHaloArr_D1_SK4, SK_"test_setCoreHaloArr_D1_SK4")
1383 : #endif
1384 : #if SK3_ENABLED
1385 : call test%run(test_setCoreHaloArr_D1_SK3, SK_"test_setCoreHaloArr_D1_SK3")
1386 : #endif
1387 : #if SK2_ENABLED
1388 : call test%run(test_setCoreHaloArr_D1_SK2, SK_"test_setCoreHaloArr_D1_SK2")
1389 : #endif
1390 : #if SK1_ENABLED
1391 1 : call test%run(test_setCoreHaloArr_D1_SK1, SK_"test_setCoreHaloArr_D1_SK1")
1392 : #endif
1393 :
1394 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1395 :
1396 : #if IK5_ENABLED
1397 1 : call test%run(test_setCoreHaloArr_D1_IK5, SK_"test_setCoreHaloArr_D1_IK5")
1398 : #endif
1399 : #if IK4_ENABLED
1400 1 : call test%run(test_setCoreHaloArr_D1_IK4, SK_"test_setCoreHaloArr_D1_IK4")
1401 : #endif
1402 : #if IK3_ENABLED
1403 1 : call test%run(test_setCoreHaloArr_D1_IK3, SK_"test_setCoreHaloArr_D1_IK3")
1404 : #endif
1405 : #if IK2_ENABLED
1406 1 : call test%run(test_setCoreHaloArr_D1_IK2, SK_"test_setCoreHaloArr_D1_IK2")
1407 : #endif
1408 : #if IK1_ENABLED
1409 1 : call test%run(test_setCoreHaloArr_D1_IK1, SK_"test_setCoreHaloArr_D1_IK1")
1410 : #endif
1411 :
1412 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1413 :
1414 : #if LK5_ENABLED
1415 1 : call test%run(test_setCoreHaloArr_D1_LK5, SK_"test_setCoreHaloArr_D1_LK5")
1416 : #endif
1417 : #if LK4_ENABLED
1418 1 : call test%run(test_setCoreHaloArr_D1_LK4, SK_"test_setCoreHaloArr_D1_LK4")
1419 : #endif
1420 : #if LK3_ENABLED
1421 1 : call test%run(test_setCoreHaloArr_D1_LK3, SK_"test_setCoreHaloArr_D1_LK3")
1422 : #endif
1423 : #if LK2_ENABLED
1424 1 : call test%run(test_setCoreHaloArr_D1_LK2, SK_"test_setCoreHaloArr_D1_LK2")
1425 : #endif
1426 : #if LK1_ENABLED
1427 1 : call test%run(test_setCoreHaloArr_D1_LK1, SK_"test_setCoreHaloArr_D1_LK1")
1428 : #endif
1429 :
1430 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1431 :
1432 : #if CK5_ENABLED
1433 : call test%run(test_setCoreHaloArr_D1_CK5, SK_"test_setCoreHaloArr_D1_CK5")
1434 : #endif
1435 : #if CK4_ENABLED
1436 1 : call test%run(test_setCoreHaloArr_D1_CK4, SK_"test_setCoreHaloArr_D1_CK4")
1437 : #endif
1438 : #if CK3_ENABLED
1439 1 : call test%run(test_setCoreHaloArr_D1_CK3, SK_"test_setCoreHaloArr_D1_CK3")
1440 : #endif
1441 : #if CK2_ENABLED
1442 1 : call test%run(test_setCoreHaloArr_D1_CK2, SK_"test_setCoreHaloArr_D1_CK2")
1443 : #endif
1444 : #if CK1_ENABLED
1445 1 : call test%run(test_setCoreHaloArr_D1_CK1, SK_"test_setCoreHaloArr_D1_CK1")
1446 : #endif
1447 :
1448 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1449 :
1450 : #if RK5_ENABLED
1451 : call test%run(test_setCoreHaloArr_D1_RK5, SK_"test_setCoreHaloArr_D1_RK5")
1452 : #endif
1453 : #if RK4_ENABLED
1454 1 : call test%run(test_setCoreHaloArr_D1_RK4, SK_"test_setCoreHaloArr_D1_RK4")
1455 : #endif
1456 : #if RK3_ENABLED
1457 1 : call test%run(test_setCoreHaloArr_D1_RK3, SK_"test_setCoreHaloArr_D1_RK3")
1458 : #endif
1459 : #if RK2_ENABLED
1460 1 : call test%run(test_setCoreHaloArr_D1_RK2, SK_"test_setCoreHaloArr_D1_RK2")
1461 : #endif
1462 : #if RK1_ENABLED
1463 1 : call test%run(test_setCoreHaloArr_D1_RK1, SK_"test_setCoreHaloArr_D1_RK1")
1464 : #endif
1465 :
1466 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1467 :
1468 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1469 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1470 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1471 :
1472 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1473 :
1474 : #if SK5_ENABLED
1475 : call test%run(test_setCoreHaloArr_D2_SK5, SK_"test_setCoreHaloArr_D2_SK5")
1476 : #endif
1477 : #if SK4_ENABLED
1478 : call test%run(test_setCoreHaloArr_D2_SK4, SK_"test_setCoreHaloArr_D2_SK4")
1479 : #endif
1480 : #if SK3_ENABLED
1481 : call test%run(test_setCoreHaloArr_D2_SK3, SK_"test_setCoreHaloArr_D2_SK3")
1482 : #endif
1483 : #if SK2_ENABLED
1484 : call test%run(test_setCoreHaloArr_D2_SK2, SK_"test_setCoreHaloArr_D2_SK2")
1485 : #endif
1486 : #if SK1_ENABLED
1487 1 : call test%run(test_setCoreHaloArr_D2_SK1, SK_"test_setCoreHaloArr_D2_SK1")
1488 : #endif
1489 :
1490 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1491 :
1492 : #if IK5_ENABLED
1493 1 : call test%run(test_setCoreHaloArr_D2_IK5, SK_"test_setCoreHaloArr_D2_IK5")
1494 : #endif
1495 : #if IK4_ENABLED
1496 1 : call test%run(test_setCoreHaloArr_D2_IK4, SK_"test_setCoreHaloArr_D2_IK4")
1497 : #endif
1498 : #if IK3_ENABLED
1499 1 : call test%run(test_setCoreHaloArr_D2_IK3, SK_"test_setCoreHaloArr_D2_IK3")
1500 : #endif
1501 : #if IK2_ENABLED
1502 1 : call test%run(test_setCoreHaloArr_D2_IK2, SK_"test_setCoreHaloArr_D2_IK2")
1503 : #endif
1504 : #if IK1_ENABLED
1505 1 : call test%run(test_setCoreHaloArr_D2_IK1, SK_"test_setCoreHaloArr_D2_IK1")
1506 : #endif
1507 :
1508 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1509 :
1510 : #if LK5_ENABLED
1511 1 : call test%run(test_setCoreHaloArr_D2_LK5, SK_"test_setCoreHaloArr_D2_LK5")
1512 : #endif
1513 : #if LK4_ENABLED
1514 1 : call test%run(test_setCoreHaloArr_D2_LK4, SK_"test_setCoreHaloArr_D2_LK4")
1515 : #endif
1516 : #if LK3_ENABLED
1517 1 : call test%run(test_setCoreHaloArr_D2_LK3, SK_"test_setCoreHaloArr_D2_LK3")
1518 : #endif
1519 : #if LK2_ENABLED
1520 1 : call test%run(test_setCoreHaloArr_D2_LK2, SK_"test_setCoreHaloArr_D2_LK2")
1521 : #endif
1522 : #if LK1_ENABLED
1523 1 : call test%run(test_setCoreHaloArr_D2_LK1, SK_"test_setCoreHaloArr_D2_LK1")
1524 : #endif
1525 :
1526 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1527 :
1528 : #if CK5_ENABLED
1529 : call test%run(test_setCoreHaloArr_D2_CK5, SK_"test_setCoreHaloArr_D2_CK5")
1530 : #endif
1531 : #if CK4_ENABLED
1532 1 : call test%run(test_setCoreHaloArr_D2_CK4, SK_"test_setCoreHaloArr_D2_CK4")
1533 : #endif
1534 : #if CK3_ENABLED
1535 1 : call test%run(test_setCoreHaloArr_D2_CK3, SK_"test_setCoreHaloArr_D2_CK3")
1536 : #endif
1537 : #if CK2_ENABLED
1538 1 : call test%run(test_setCoreHaloArr_D2_CK2, SK_"test_setCoreHaloArr_D2_CK2")
1539 : #endif
1540 : #if CK1_ENABLED
1541 1 : call test%run(test_setCoreHaloArr_D2_CK1, SK_"test_setCoreHaloArr_D2_CK1")
1542 : #endif
1543 :
1544 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1545 :
1546 : #if RK5_ENABLED
1547 : call test%run(test_setCoreHaloArr_D2_RK5, SK_"test_setCoreHaloArr_D2_RK5")
1548 : #endif
1549 : #if RK4_ENABLED
1550 1 : call test%run(test_setCoreHaloArr_D2_RK4, SK_"test_setCoreHaloArr_D2_RK4")
1551 : #endif
1552 : #if RK3_ENABLED
1553 1 : call test%run(test_setCoreHaloArr_D2_RK3, SK_"test_setCoreHaloArr_D2_RK3")
1554 : #endif
1555 : #if RK2_ENABLED
1556 1 : call test%run(test_setCoreHaloArr_D2_RK2, SK_"test_setCoreHaloArr_D2_RK2")
1557 : #endif
1558 : #if RK1_ENABLED
1559 1 : call test%run(test_setCoreHaloArr_D2_RK1, SK_"test_setCoreHaloArr_D2_RK1")
1560 : #endif
1561 :
1562 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1563 :
1564 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1565 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1566 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1567 :
1568 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1569 :
1570 : #if SK5_ENABLED
1571 : call test%run(test_setCoreHaloArr_D3_SK5, SK_"test_setCoreHaloArr_D3_SK5")
1572 : #endif
1573 : #if SK4_ENABLED
1574 : call test%run(test_setCoreHaloArr_D3_SK4, SK_"test_setCoreHaloArr_D3_SK4")
1575 : #endif
1576 : #if SK3_ENABLED
1577 : call test%run(test_setCoreHaloArr_D3_SK3, SK_"test_setCoreHaloArr_D3_SK3")
1578 : #endif
1579 : #if SK2_ENABLED
1580 : call test%run(test_setCoreHaloArr_D3_SK2, SK_"test_setCoreHaloArr_D3_SK2")
1581 : #endif
1582 : #if SK1_ENABLED
1583 1 : call test%run(test_setCoreHaloArr_D3_SK1, SK_"test_setCoreHaloArr_D3_SK1")
1584 : #endif
1585 :
1586 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1587 :
1588 : #if IK5_ENABLED
1589 1 : call test%run(test_setCoreHaloArr_D3_IK5, SK_"test_setCoreHaloArr_D3_IK5")
1590 : #endif
1591 : #if IK4_ENABLED
1592 1 : call test%run(test_setCoreHaloArr_D3_IK4, SK_"test_setCoreHaloArr_D3_IK4")
1593 : #endif
1594 : #if IK3_ENABLED
1595 1 : call test%run(test_setCoreHaloArr_D3_IK3, SK_"test_setCoreHaloArr_D3_IK3")
1596 : #endif
1597 : #if IK2_ENABLED
1598 1 : call test%run(test_setCoreHaloArr_D3_IK2, SK_"test_setCoreHaloArr_D3_IK2")
1599 : #endif
1600 : #if IK1_ENABLED
1601 1 : call test%run(test_setCoreHaloArr_D3_IK1, SK_"test_setCoreHaloArr_D3_IK1")
1602 : #endif
1603 :
1604 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1605 :
1606 : #if LK5_ENABLED
1607 1 : call test%run(test_setCoreHaloArr_D3_LK5, SK_"test_setCoreHaloArr_D3_LK5")
1608 : #endif
1609 : #if LK4_ENABLED
1610 1 : call test%run(test_setCoreHaloArr_D3_LK4, SK_"test_setCoreHaloArr_D3_LK4")
1611 : #endif
1612 : #if LK3_ENABLED
1613 1 : call test%run(test_setCoreHaloArr_D3_LK3, SK_"test_setCoreHaloArr_D3_LK3")
1614 : #endif
1615 : #if LK2_ENABLED
1616 1 : call test%run(test_setCoreHaloArr_D3_LK2, SK_"test_setCoreHaloArr_D3_LK2")
1617 : #endif
1618 : #if LK1_ENABLED
1619 1 : call test%run(test_setCoreHaloArr_D3_LK1, SK_"test_setCoreHaloArr_D3_LK1")
1620 : #endif
1621 :
1622 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1623 :
1624 : #if CK5_ENABLED
1625 : call test%run(test_setCoreHaloArr_D3_CK5, SK_"test_setCoreHaloArr_D3_CK5")
1626 : #endif
1627 : #if CK4_ENABLED
1628 1 : call test%run(test_setCoreHaloArr_D3_CK4, SK_"test_setCoreHaloArr_D3_CK4")
1629 : #endif
1630 : #if CK3_ENABLED
1631 1 : call test%run(test_setCoreHaloArr_D3_CK3, SK_"test_setCoreHaloArr_D3_CK3")
1632 : #endif
1633 : #if CK2_ENABLED
1634 1 : call test%run(test_setCoreHaloArr_D3_CK2, SK_"test_setCoreHaloArr_D3_CK2")
1635 : #endif
1636 : #if CK1_ENABLED
1637 1 : call test%run(test_setCoreHaloArr_D3_CK1, SK_"test_setCoreHaloArr_D3_CK1")
1638 : #endif
1639 :
1640 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1641 :
1642 : #if RK5_ENABLED
1643 : call test%run(test_setCoreHaloArr_D3_RK5, SK_"test_setCoreHaloArr_D3_RK5")
1644 : #endif
1645 : #if RK4_ENABLED
1646 1 : call test%run(test_setCoreHaloArr_D3_RK4, SK_"test_setCoreHaloArr_D3_RK4")
1647 : #endif
1648 : #if RK3_ENABLED
1649 1 : call test%run(test_setCoreHaloArr_D3_RK3, SK_"test_setCoreHaloArr_D3_RK3")
1650 : #endif
1651 : #if RK2_ENABLED
1652 1 : call test%run(test_setCoreHaloArr_D3_RK2, SK_"test_setCoreHaloArr_D3_RK2")
1653 : #endif
1654 : #if RK1_ENABLED
1655 1 : call test%run(test_setCoreHaloArr_D3_RK1, SK_"test_setCoreHaloArr_D3_RK1")
1656 : #endif
1657 :
1658 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1659 :
1660 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1661 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1662 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1663 :
1664 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1665 :
1666 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1667 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1668 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1669 :
1670 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1671 :
1672 : #if SK5_ENABLED
1673 : call test%run(test_setCoreHaloSca_D0_SK5, SK_"test_setCoreHaloSca_D0_SK5")
1674 : #endif
1675 : #if SK4_ENABLED
1676 : call test%run(test_setCoreHaloSca_D0_SK4, SK_"test_setCoreHaloSca_D0_SK4")
1677 : #endif
1678 : #if SK3_ENABLED
1679 : call test%run(test_setCoreHaloSca_D0_SK3, SK_"test_setCoreHaloSca_D0_SK3")
1680 : #endif
1681 : #if SK2_ENABLED
1682 : call test%run(test_setCoreHaloSca_D0_SK2, SK_"test_setCoreHaloSca_D0_SK2")
1683 : #endif
1684 : #if SK1_ENABLED
1685 1 : call test%run(test_setCoreHaloSca_D0_SK1, SK_"test_setCoreHaloSca_D0_SK1")
1686 : #endif
1687 :
1688 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1689 :
1690 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1691 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1692 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1693 :
1694 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1695 :
1696 : #if SK5_ENABLED
1697 : call test%run(test_setCoreHaloSca_D1_SK5, SK_"test_setCoreHaloSca_D1_SK5")
1698 : #endif
1699 : #if SK4_ENABLED
1700 : call test%run(test_setCoreHaloSca_D1_SK4, SK_"test_setCoreHaloSca_D1_SK4")
1701 : #endif
1702 : #if SK3_ENABLED
1703 : call test%run(test_setCoreHaloSca_D1_SK3, SK_"test_setCoreHaloSca_D1_SK3")
1704 : #endif
1705 : #if SK2_ENABLED
1706 : call test%run(test_setCoreHaloSca_D1_SK2, SK_"test_setCoreHaloSca_D1_SK2")
1707 : #endif
1708 : #if SK1_ENABLED
1709 1 : call test%run(test_setCoreHaloSca_D1_SK1, SK_"test_setCoreHaloSca_D1_SK1")
1710 : #endif
1711 :
1712 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1713 :
1714 : #if IK5_ENABLED
1715 1 : call test%run(test_setCoreHaloSca_D1_IK5, SK_"test_setCoreHaloSca_D1_IK5")
1716 : #endif
1717 : #if IK4_ENABLED
1718 1 : call test%run(test_setCoreHaloSca_D1_IK4, SK_"test_setCoreHaloSca_D1_IK4")
1719 : #endif
1720 : #if IK3_ENABLED
1721 1 : call test%run(test_setCoreHaloSca_D1_IK3, SK_"test_setCoreHaloSca_D1_IK3")
1722 : #endif
1723 : #if IK2_ENABLED
1724 1 : call test%run(test_setCoreHaloSca_D1_IK2, SK_"test_setCoreHaloSca_D1_IK2")
1725 : #endif
1726 : #if IK1_ENABLED
1727 1 : call test%run(test_setCoreHaloSca_D1_IK1, SK_"test_setCoreHaloSca_D1_IK1")
1728 : #endif
1729 :
1730 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1731 :
1732 : #if LK5_ENABLED
1733 1 : call test%run(test_setCoreHaloSca_D1_LK5, SK_"test_setCoreHaloSca_D1_LK5")
1734 : #endif
1735 : #if LK4_ENABLED
1736 1 : call test%run(test_setCoreHaloSca_D1_LK4, SK_"test_setCoreHaloSca_D1_LK4")
1737 : #endif
1738 : #if LK3_ENABLED
1739 1 : call test%run(test_setCoreHaloSca_D1_LK3, SK_"test_setCoreHaloSca_D1_LK3")
1740 : #endif
1741 : #if LK2_ENABLED
1742 1 : call test%run(test_setCoreHaloSca_D1_LK2, SK_"test_setCoreHaloSca_D1_LK2")
1743 : #endif
1744 : #if LK1_ENABLED
1745 1 : call test%run(test_setCoreHaloSca_D1_LK1, SK_"test_setCoreHaloSca_D1_LK1")
1746 : #endif
1747 :
1748 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1749 :
1750 : #if CK5_ENABLED
1751 : call test%run(test_setCoreHaloSca_D1_CK5, SK_"test_setCoreHaloSca_D1_CK5")
1752 : #endif
1753 : #if CK4_ENABLED
1754 1 : call test%run(test_setCoreHaloSca_D1_CK4, SK_"test_setCoreHaloSca_D1_CK4")
1755 : #endif
1756 : #if CK3_ENABLED
1757 1 : call test%run(test_setCoreHaloSca_D1_CK3, SK_"test_setCoreHaloSca_D1_CK3")
1758 : #endif
1759 : #if CK2_ENABLED
1760 1 : call test%run(test_setCoreHaloSca_D1_CK2, SK_"test_setCoreHaloSca_D1_CK2")
1761 : #endif
1762 : #if CK1_ENABLED
1763 1 : call test%run(test_setCoreHaloSca_D1_CK1, SK_"test_setCoreHaloSca_D1_CK1")
1764 : #endif
1765 :
1766 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1767 :
1768 : #if RK5_ENABLED
1769 : call test%run(test_setCoreHaloSca_D1_RK5, SK_"test_setCoreHaloSca_D1_RK5")
1770 : #endif
1771 : #if RK4_ENABLED
1772 1 : call test%run(test_setCoreHaloSca_D1_RK4, SK_"test_setCoreHaloSca_D1_RK4")
1773 : #endif
1774 : #if RK3_ENABLED
1775 1 : call test%run(test_setCoreHaloSca_D1_RK3, SK_"test_setCoreHaloSca_D1_RK3")
1776 : #endif
1777 : #if RK2_ENABLED
1778 1 : call test%run(test_setCoreHaloSca_D1_RK2, SK_"test_setCoreHaloSca_D1_RK2")
1779 : #endif
1780 : #if RK1_ENABLED
1781 1 : call test%run(test_setCoreHaloSca_D1_RK1, SK_"test_setCoreHaloSca_D1_RK1")
1782 : #endif
1783 :
1784 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1785 :
1786 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1787 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1788 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1789 :
1790 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1791 :
1792 : #if SK5_ENABLED
1793 : call test%run(test_setCoreHaloSca_D2_SK5, SK_"test_setCoreHaloSca_D2_SK5")
1794 : #endif
1795 : #if SK4_ENABLED
1796 : call test%run(test_setCoreHaloSca_D2_SK4, SK_"test_setCoreHaloSca_D2_SK4")
1797 : #endif
1798 : #if SK3_ENABLED
1799 : call test%run(test_setCoreHaloSca_D2_SK3, SK_"test_setCoreHaloSca_D2_SK3")
1800 : #endif
1801 : #if SK2_ENABLED
1802 : call test%run(test_setCoreHaloSca_D2_SK2, SK_"test_setCoreHaloSca_D2_SK2")
1803 : #endif
1804 : #if SK1_ENABLED
1805 1 : call test%run(test_setCoreHaloSca_D2_SK1, SK_"test_setCoreHaloSca_D2_SK1")
1806 : #endif
1807 :
1808 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1809 :
1810 : #if IK5_ENABLED
1811 1 : call test%run(test_setCoreHaloSca_D2_IK5, SK_"test_setCoreHaloSca_D2_IK5")
1812 : #endif
1813 : #if IK4_ENABLED
1814 1 : call test%run(test_setCoreHaloSca_D2_IK4, SK_"test_setCoreHaloSca_D2_IK4")
1815 : #endif
1816 : #if IK3_ENABLED
1817 1 : call test%run(test_setCoreHaloSca_D2_IK3, SK_"test_setCoreHaloSca_D2_IK3")
1818 : #endif
1819 : #if IK2_ENABLED
1820 1 : call test%run(test_setCoreHaloSca_D2_IK2, SK_"test_setCoreHaloSca_D2_IK2")
1821 : #endif
1822 : #if IK1_ENABLED
1823 1 : call test%run(test_setCoreHaloSca_D2_IK1, SK_"test_setCoreHaloSca_D2_IK1")
1824 : #endif
1825 :
1826 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1827 :
1828 : #if LK5_ENABLED
1829 1 : call test%run(test_setCoreHaloSca_D2_LK5, SK_"test_setCoreHaloSca_D2_LK5")
1830 : #endif
1831 : #if LK4_ENABLED
1832 1 : call test%run(test_setCoreHaloSca_D2_LK4, SK_"test_setCoreHaloSca_D2_LK4")
1833 : #endif
1834 : #if LK3_ENABLED
1835 1 : call test%run(test_setCoreHaloSca_D2_LK3, SK_"test_setCoreHaloSca_D2_LK3")
1836 : #endif
1837 : #if LK2_ENABLED
1838 1 : call test%run(test_setCoreHaloSca_D2_LK2, SK_"test_setCoreHaloSca_D2_LK2")
1839 : #endif
1840 : #if LK1_ENABLED
1841 1 : call test%run(test_setCoreHaloSca_D2_LK1, SK_"test_setCoreHaloSca_D2_LK1")
1842 : #endif
1843 :
1844 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1845 :
1846 : #if CK5_ENABLED
1847 : call test%run(test_setCoreHaloSca_D2_CK5, SK_"test_setCoreHaloSca_D2_CK5")
1848 : #endif
1849 : #if CK4_ENABLED
1850 1 : call test%run(test_setCoreHaloSca_D2_CK4, SK_"test_setCoreHaloSca_D2_CK4")
1851 : #endif
1852 : #if CK3_ENABLED
1853 1 : call test%run(test_setCoreHaloSca_D2_CK3, SK_"test_setCoreHaloSca_D2_CK3")
1854 : #endif
1855 : #if CK2_ENABLED
1856 1 : call test%run(test_setCoreHaloSca_D2_CK2, SK_"test_setCoreHaloSca_D2_CK2")
1857 : #endif
1858 : #if CK1_ENABLED
1859 1 : call test%run(test_setCoreHaloSca_D2_CK1, SK_"test_setCoreHaloSca_D2_CK1")
1860 : #endif
1861 :
1862 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1863 :
1864 : #if RK5_ENABLED
1865 : call test%run(test_setCoreHaloSca_D2_RK5, SK_"test_setCoreHaloSca_D2_RK5")
1866 : #endif
1867 : #if RK4_ENABLED
1868 1 : call test%run(test_setCoreHaloSca_D2_RK4, SK_"test_setCoreHaloSca_D2_RK4")
1869 : #endif
1870 : #if RK3_ENABLED
1871 1 : call test%run(test_setCoreHaloSca_D2_RK3, SK_"test_setCoreHaloSca_D2_RK3")
1872 : #endif
1873 : #if RK2_ENABLED
1874 1 : call test%run(test_setCoreHaloSca_D2_RK2, SK_"test_setCoreHaloSca_D2_RK2")
1875 : #endif
1876 : #if RK1_ENABLED
1877 1 : call test%run(test_setCoreHaloSca_D2_RK1, SK_"test_setCoreHaloSca_D2_RK1")
1878 : #endif
1879 :
1880 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1881 :
1882 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1883 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1884 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1885 :
1886 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1887 :
1888 : #if SK5_ENABLED
1889 : call test%run(test_setCoreHaloSca_D3_SK5, SK_"test_setCoreHaloSca_D3_SK5")
1890 : #endif
1891 : #if SK4_ENABLED
1892 : call test%run(test_setCoreHaloSca_D3_SK4, SK_"test_setCoreHaloSca_D3_SK4")
1893 : #endif
1894 : #if SK3_ENABLED
1895 : call test%run(test_setCoreHaloSca_D3_SK3, SK_"test_setCoreHaloSca_D3_SK3")
1896 : #endif
1897 : #if SK2_ENABLED
1898 : call test%run(test_setCoreHaloSca_D3_SK2, SK_"test_setCoreHaloSca_D3_SK2")
1899 : #endif
1900 : #if SK1_ENABLED
1901 1 : call test%run(test_setCoreHaloSca_D3_SK1, SK_"test_setCoreHaloSca_D3_SK1")
1902 : #endif
1903 :
1904 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1905 :
1906 : #if IK5_ENABLED
1907 1 : call test%run(test_setCoreHaloSca_D3_IK5, SK_"test_setCoreHaloSca_D3_IK5")
1908 : #endif
1909 : #if IK4_ENABLED
1910 1 : call test%run(test_setCoreHaloSca_D3_IK4, SK_"test_setCoreHaloSca_D3_IK4")
1911 : #endif
1912 : #if IK3_ENABLED
1913 1 : call test%run(test_setCoreHaloSca_D3_IK3, SK_"test_setCoreHaloSca_D3_IK3")
1914 : #endif
1915 : #if IK2_ENABLED
1916 1 : call test%run(test_setCoreHaloSca_D3_IK2, SK_"test_setCoreHaloSca_D3_IK2")
1917 : #endif
1918 : #if IK1_ENABLED
1919 1 : call test%run(test_setCoreHaloSca_D3_IK1, SK_"test_setCoreHaloSca_D3_IK1")
1920 : #endif
1921 :
1922 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1923 :
1924 : #if LK5_ENABLED
1925 1 : call test%run(test_setCoreHaloSca_D3_LK5, SK_"test_setCoreHaloSca_D3_LK5")
1926 : #endif
1927 : #if LK4_ENABLED
1928 1 : call test%run(test_setCoreHaloSca_D3_LK4, SK_"test_setCoreHaloSca_D3_LK4")
1929 : #endif
1930 : #if LK3_ENABLED
1931 1 : call test%run(test_setCoreHaloSca_D3_LK3, SK_"test_setCoreHaloSca_D3_LK3")
1932 : #endif
1933 : #if LK2_ENABLED
1934 1 : call test%run(test_setCoreHaloSca_D3_LK2, SK_"test_setCoreHaloSca_D3_LK2")
1935 : #endif
1936 : #if LK1_ENABLED
1937 1 : call test%run(test_setCoreHaloSca_D3_LK1, SK_"test_setCoreHaloSca_D3_LK1")
1938 : #endif
1939 :
1940 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1941 :
1942 : #if CK5_ENABLED
1943 : call test%run(test_setCoreHaloSca_D3_CK5, SK_"test_setCoreHaloSca_D3_CK5")
1944 : #endif
1945 : #if CK4_ENABLED
1946 1 : call test%run(test_setCoreHaloSca_D3_CK4, SK_"test_setCoreHaloSca_D3_CK4")
1947 : #endif
1948 : #if CK3_ENABLED
1949 1 : call test%run(test_setCoreHaloSca_D3_CK3, SK_"test_setCoreHaloSca_D3_CK3")
1950 : #endif
1951 : #if CK2_ENABLED
1952 1 : call test%run(test_setCoreHaloSca_D3_CK2, SK_"test_setCoreHaloSca_D3_CK2")
1953 : #endif
1954 : #if CK1_ENABLED
1955 1 : call test%run(test_setCoreHaloSca_D3_CK1, SK_"test_setCoreHaloSca_D3_CK1")
1956 : #endif
1957 :
1958 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1959 :
1960 : #if RK5_ENABLED
1961 : call test%run(test_setCoreHaloSca_D3_RK5, SK_"test_setCoreHaloSca_D3_RK5")
1962 : #endif
1963 : #if RK4_ENABLED
1964 1 : call test%run(test_setCoreHaloSca_D3_RK4, SK_"test_setCoreHaloSca_D3_RK4")
1965 : #endif
1966 : #if RK3_ENABLED
1967 1 : call test%run(test_setCoreHaloSca_D3_RK3, SK_"test_setCoreHaloSca_D3_RK3")
1968 : #endif
1969 : #if RK2_ENABLED
1970 1 : call test%run(test_setCoreHaloSca_D3_RK2, SK_"test_setCoreHaloSca_D3_RK2")
1971 : #endif
1972 : #if RK1_ENABLED
1973 1 : call test%run(test_setCoreHaloSca_D3_RK1, SK_"test_setCoreHaloSca_D3_RK1")
1974 : #endif
1975 :
1976 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1977 :
1978 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1979 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1980 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1981 :
1982 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1983 :
1984 1 : call test%summarize()
1985 :
1986 1 : end subroutine setTest
1987 :
1988 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1989 :
1990 : end module test_pm_arrayInit
|
