ParaMonte Fortran 2.0.0
Parallel Monte Carlo and Machine Learning Library
See the latest version documentation.
test_pm_arrayRank.F90
Go to the documentation of this file.
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
23
24!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
25
26module test_pm_arrayRank
27
28 use pm_arrayRank
29 use pm_test, only: test_type
30 use pm_kind, only: IK, LK, RK
31 implicit none
32
33 private
34 public :: setTest
35 type(test_type) :: test
36
37!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
38
39 interface
40
41 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
42
43#if SK5_ENABLED
44 module function test_getRankDense_D0_SK5() result(assertion); logical(LK) :: assertion; end function
45#endif
46#if SK4_ENABLED
47 module function test_getRankDense_D0_SK4() result(assertion); logical(LK) :: assertion; end function
48#endif
49#if SK3_ENABLED
50 module function test_getRankDense_D0_SK3() result(assertion); logical(LK) :: assertion; end function
51#endif
52#if SK2_ENABLED
53 module function test_getRankDense_D0_SK2() result(assertion); logical(LK) :: assertion; end function
54#endif
55#if SK1_ENABLED
56 module function test_getRankDense_D0_SK1() result(assertion); logical(LK) :: assertion; end function
57#endif
58
59 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
60
61#if SK5_ENABLED
62 module function test_getRankDense_D1_SK5() result(assertion); logical(LK) :: assertion; end function
63#endif
64#if SK4_ENABLED
65 module function test_getRankDense_D1_SK4() result(assertion); logical(LK) :: assertion; end function
66#endif
67#if SK3_ENABLED
68 module function test_getRankDense_D1_SK3() result(assertion); logical(LK) :: assertion; end function
69#endif
70#if SK2_ENABLED
71 module function test_getRankDense_D1_SK2() result(assertion); logical(LK) :: assertion; end function
72#endif
73#if SK1_ENABLED
74 module function test_getRankDense_D1_SK1() result(assertion); logical(LK) :: assertion; end function
75#endif
76
77 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
78
79#if IK5_ENABLED
80 module function test_getRankDense_D1_IK5() result(assertion); logical(LK) :: assertion; end function
81#endif
82#if IK4_ENABLED
83 module function test_getRankDense_D1_IK4() result(assertion); logical(LK) :: assertion; end function
84#endif
85#if IK3_ENABLED
86 module function test_getRankDense_D1_IK3() result(assertion); logical(LK) :: assertion; end function
87#endif
88#if IK2_ENABLED
89 module function test_getRankDense_D1_IK2() result(assertion); logical(LK) :: assertion; end function
90#endif
91#if IK1_ENABLED
92 module function test_getRankDense_D1_IK1() result(assertion); logical(LK) :: assertion; end function
93#endif
94
95 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
96
97#if LK5_ENABLED
98 module function test_getRankDense_D1_LK5() result(assertion); logical(LK) :: assertion; end function
99#endif
100#if LK4_ENABLED
101 module function test_getRankDense_D1_LK4() result(assertion); logical(LK) :: assertion; end function
102#endif
103#if LK3_ENABLED
104 module function test_getRankDense_D1_LK3() result(assertion); logical(LK) :: assertion; end function
105#endif
106#if LK2_ENABLED
107 module function test_getRankDense_D1_LK2() result(assertion); logical(LK) :: assertion; end function
108#endif
109#if LK1_ENABLED
110 module function test_getRankDense_D1_LK1() result(assertion); logical(LK) :: assertion; end function
111#endif
112
113 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
114
115#if CK5_ENABLED
116 module function test_getRankDense_D1_CK5() result(assertion); logical(LK) :: assertion; end function
117#endif
118#if CK4_ENABLED
119 module function test_getRankDense_D1_CK4() result(assertion); logical(LK) :: assertion; end function
120#endif
121#if CK3_ENABLED
122 module function test_getRankDense_D1_CK3() result(assertion); logical(LK) :: assertion; end function
123#endif
124#if CK2_ENABLED
125 module function test_getRankDense_D1_CK2() result(assertion); logical(LK) :: assertion; end function
126#endif
127#if CK1_ENABLED
128 module function test_getRankDense_D1_CK1() result(assertion); logical(LK) :: assertion; end function
129#endif
130
131 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
132
133#if RK5_ENABLED
134 module function test_getRankDense_D1_RK5() result(assertion); logical(LK) :: assertion; end function
135#endif
136#if RK4_ENABLED
137 module function test_getRankDense_D1_RK4() result(assertion); logical(LK) :: assertion; end function
138#endif
139#if RK3_ENABLED
140 module function test_getRankDense_D1_RK3() result(assertion); logical(LK) :: assertion; end function
141#endif
142#if RK2_ENABLED
143 module function test_getRankDense_D1_RK2() result(assertion); logical(LK) :: assertion; end function
144#endif
145#if RK1_ENABLED
146 module function test_getRankDense_D1_RK1() result(assertion); logical(LK) :: assertion; end function
147#endif
148
149 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
150
151#if SK5_ENABLED
152 module function test_getRankDense_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
153#endif
154#if SK4_ENABLED
155 module function test_getRankDense_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
156#endif
157#if SK3_ENABLED
158 module function test_getRankDense_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
159#endif
160#if SK2_ENABLED
161 module function test_getRankDense_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
162#endif
163#if SK1_ENABLED
164 module function test_getRankDense_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
165#endif
166
167 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
168
169 end interface
170
171!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
172
173 interface
174
175 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
176
177#if SK5_ENABLED
178 module function test_setRankDense_D0_SK5() result(assertion); logical(LK) :: assertion; end function
179#endif
180#if SK4_ENABLED
181 module function test_setRankDense_D0_SK4() result(assertion); logical(LK) :: assertion; end function
182#endif
183#if SK3_ENABLED
184 module function test_setRankDense_D0_SK3() result(assertion); logical(LK) :: assertion; end function
185#endif
186#if SK2_ENABLED
187 module function test_setRankDense_D0_SK2() result(assertion); logical(LK) :: assertion; end function
188#endif
189#if SK1_ENABLED
190 module function test_setRankDense_D0_SK1() result(assertion); logical(LK) :: assertion; end function
191#endif
192
193 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
194
195#if SK5_ENABLED
196 module function test_setRankDense_D1_SK5() result(assertion); logical(LK) :: assertion; end function
197#endif
198#if SK4_ENABLED
199 module function test_setRankDense_D1_SK4() result(assertion); logical(LK) :: assertion; end function
200#endif
201#if SK3_ENABLED
202 module function test_setRankDense_D1_SK3() result(assertion); logical(LK) :: assertion; end function
203#endif
204#if SK2_ENABLED
205 module function test_setRankDense_D1_SK2() result(assertion); logical(LK) :: assertion; end function
206#endif
207#if SK1_ENABLED
208 module function test_setRankDense_D1_SK1() result(assertion); logical(LK) :: assertion; end function
209#endif
210
211 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
212
213#if IK5_ENABLED
214 module function test_setRankDense_D1_IK5() result(assertion); logical(LK) :: assertion; end function
215#endif
216#if IK4_ENABLED
217 module function test_setRankDense_D1_IK4() result(assertion); logical(LK) :: assertion; end function
218#endif
219#if IK3_ENABLED
220 module function test_setRankDense_D1_IK3() result(assertion); logical(LK) :: assertion; end function
221#endif
222#if IK2_ENABLED
223 module function test_setRankDense_D1_IK2() result(assertion); logical(LK) :: assertion; end function
224#endif
225#if IK1_ENABLED
226 module function test_setRankDense_D1_IK1() result(assertion); logical(LK) :: assertion; end function
227#endif
228
229 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
230
231#if LK5_ENABLED
232 module function test_setRankDense_D1_LK5() result(assertion); logical(LK) :: assertion; end function
233#endif
234#if LK4_ENABLED
235 module function test_setRankDense_D1_LK4() result(assertion); logical(LK) :: assertion; end function
236#endif
237#if LK3_ENABLED
238 module function test_setRankDense_D1_LK3() result(assertion); logical(LK) :: assertion; end function
239#endif
240#if LK2_ENABLED
241 module function test_setRankDense_D1_LK2() result(assertion); logical(LK) :: assertion; end function
242#endif
243#if LK1_ENABLED
244 module function test_setRankDense_D1_LK1() result(assertion); logical(LK) :: assertion; end function
245#endif
246
247 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
248
249#if CK5_ENABLED
250 module function test_setRankDense_D1_CK5() result(assertion); logical(LK) :: assertion; end function
251#endif
252#if CK4_ENABLED
253 module function test_setRankDense_D1_CK4() result(assertion); logical(LK) :: assertion; end function
254#endif
255#if CK3_ENABLED
256 module function test_setRankDense_D1_CK3() result(assertion); logical(LK) :: assertion; end function
257#endif
258#if CK2_ENABLED
259 module function test_setRankDense_D1_CK2() result(assertion); logical(LK) :: assertion; end function
260#endif
261#if CK1_ENABLED
262 module function test_setRankDense_D1_CK1() result(assertion); logical(LK) :: assertion; end function
263#endif
264
265 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
266
267#if RK5_ENABLED
268 module function test_setRankDense_D1_RK5() result(assertion); logical(LK) :: assertion; end function
269#endif
270#if RK4_ENABLED
271 module function test_setRankDense_D1_RK4() result(assertion); logical(LK) :: assertion; end function
272#endif
273#if RK3_ENABLED
274 module function test_setRankDense_D1_RK3() result(assertion); logical(LK) :: assertion; end function
275#endif
276#if RK2_ENABLED
277 module function test_setRankDense_D1_RK2() result(assertion); logical(LK) :: assertion; end function
278#endif
279#if RK1_ENABLED
280 module function test_setRankDense_D1_RK1() result(assertion); logical(LK) :: assertion; end function
281#endif
282
283 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
284
285#if SK5_ENABLED
286 module function test_setRankDense_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
287#endif
288#if SK4_ENABLED
289 module function test_setRankDense_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
290#endif
291#if SK3_ENABLED
292 module function test_setRankDense_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
293#endif
294#if SK2_ENABLED
295 module function test_setRankDense_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
296#endif
297#if SK1_ENABLED
298 module function test_setRankDense_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
299#endif
300
301 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
302
303 end interface
304
305!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
306
307 interface
308
309 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
310
311#if SK5_ENABLED
312 module function test_getRankFractional_D0_SK5() result(assertion); logical(LK) :: assertion; end function
313#endif
314#if SK4_ENABLED
315 module function test_getRankFractional_D0_SK4() result(assertion); logical(LK) :: assertion; end function
316#endif
317#if SK3_ENABLED
318 module function test_getRankFractional_D0_SK3() result(assertion); logical(LK) :: assertion; end function
319#endif
320#if SK2_ENABLED
321 module function test_getRankFractional_D0_SK2() result(assertion); logical(LK) :: assertion; end function
322#endif
323#if SK1_ENABLED
324 module function test_getRankFractional_D0_SK1() result(assertion); logical(LK) :: assertion; end function
325#endif
326
327 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
328
329#if SK5_ENABLED
330 module function test_getRankFractional_D1_SK5() result(assertion); logical(LK) :: assertion; end function
331#endif
332#if SK4_ENABLED
333 module function test_getRankFractional_D1_SK4() result(assertion); logical(LK) :: assertion; end function
334#endif
335#if SK3_ENABLED
336 module function test_getRankFractional_D1_SK3() result(assertion); logical(LK) :: assertion; end function
337#endif
338#if SK2_ENABLED
339 module function test_getRankFractional_D1_SK2() result(assertion); logical(LK) :: assertion; end function
340#endif
341#if SK1_ENABLED
342 module function test_getRankFractional_D1_SK1() result(assertion); logical(LK) :: assertion; end function
343#endif
344
345 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
346
347#if IK5_ENABLED
348 module function test_getRankFractional_D1_IK5() result(assertion); logical(LK) :: assertion; end function
349#endif
350#if IK4_ENABLED
351 module function test_getRankFractional_D1_IK4() result(assertion); logical(LK) :: assertion; end function
352#endif
353#if IK3_ENABLED
354 module function test_getRankFractional_D1_IK3() result(assertion); logical(LK) :: assertion; end function
355#endif
356#if IK2_ENABLED
357 module function test_getRankFractional_D1_IK2() result(assertion); logical(LK) :: assertion; end function
358#endif
359#if IK1_ENABLED
360 module function test_getRankFractional_D1_IK1() result(assertion); logical(LK) :: assertion; end function
361#endif
362
363 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
364
365#if LK5_ENABLED
366 module function test_getRankFractional_D1_LK5() result(assertion); logical(LK) :: assertion; end function
367#endif
368#if LK4_ENABLED
369 module function test_getRankFractional_D1_LK4() result(assertion); logical(LK) :: assertion; end function
370#endif
371#if LK3_ENABLED
372 module function test_getRankFractional_D1_LK3() result(assertion); logical(LK) :: assertion; end function
373#endif
374#if LK2_ENABLED
375 module function test_getRankFractional_D1_LK2() result(assertion); logical(LK) :: assertion; end function
376#endif
377#if LK1_ENABLED
378 module function test_getRankFractional_D1_LK1() result(assertion); logical(LK) :: assertion; end function
379#endif
380
381 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
382
383#if CK5_ENABLED
384 module function test_getRankFractional_D1_CK5() result(assertion); logical(LK) :: assertion; end function
385#endif
386#if CK4_ENABLED
387 module function test_getRankFractional_D1_CK4() result(assertion); logical(LK) :: assertion; end function
388#endif
389#if CK3_ENABLED
390 module function test_getRankFractional_D1_CK3() result(assertion); logical(LK) :: assertion; end function
391#endif
392#if CK2_ENABLED
393 module function test_getRankFractional_D1_CK2() result(assertion); logical(LK) :: assertion; end function
394#endif
395#if CK1_ENABLED
396 module function test_getRankFractional_D1_CK1() result(assertion); logical(LK) :: assertion; end function
397#endif
398
399 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
400
401#if RK5_ENABLED
402 module function test_getRankFractional_D1_RK5() result(assertion); logical(LK) :: assertion; end function
403#endif
404#if RK4_ENABLED
405 module function test_getRankFractional_D1_RK4() result(assertion); logical(LK) :: assertion; end function
406#endif
407#if RK3_ENABLED
408 module function test_getRankFractional_D1_RK3() result(assertion); logical(LK) :: assertion; end function
409#endif
410#if RK2_ENABLED
411 module function test_getRankFractional_D1_RK2() result(assertion); logical(LK) :: assertion; end function
412#endif
413#if RK1_ENABLED
414 module function test_getRankFractional_D1_RK1() result(assertion); logical(LK) :: assertion; end function
415#endif
416
417 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
418
419#if SK5_ENABLED
420 module function test_getRankFractional_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
421#endif
422#if SK4_ENABLED
423 module function test_getRankFractional_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
424#endif
425#if SK3_ENABLED
426 module function test_getRankFractional_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
427#endif
428#if SK2_ENABLED
429 module function test_getRankFractional_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
430#endif
431#if SK1_ENABLED
432 module function test_getRankFractional_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
433#endif
434
435 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
436
437 end interface
438
439!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
440
441 interface
442
443 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
444
445#if SK5_ENABLED
446 module function test_setRankFractional_D0_SK5() result(assertion); logical(LK) :: assertion; end function
447#endif
448#if SK4_ENABLED
449 module function test_setRankFractional_D0_SK4() result(assertion); logical(LK) :: assertion; end function
450#endif
451#if SK3_ENABLED
452 module function test_setRankFractional_D0_SK3() result(assertion); logical(LK) :: assertion; end function
453#endif
454#if SK2_ENABLED
455 module function test_setRankFractional_D0_SK2() result(assertion); logical(LK) :: assertion; end function
456#endif
457#if SK1_ENABLED
458 module function test_setRankFractional_D0_SK1() result(assertion); logical(LK) :: assertion; end function
459#endif
460
461 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
462
463#if SK5_ENABLED
464 module function test_setRankFractional_D1_SK5() result(assertion); logical(LK) :: assertion; end function
465#endif
466#if SK4_ENABLED
467 module function test_setRankFractional_D1_SK4() result(assertion); logical(LK) :: assertion; end function
468#endif
469#if SK3_ENABLED
470 module function test_setRankFractional_D1_SK3() result(assertion); logical(LK) :: assertion; end function
471#endif
472#if SK2_ENABLED
473 module function test_setRankFractional_D1_SK2() result(assertion); logical(LK) :: assertion; end function
474#endif
475#if SK1_ENABLED
476 module function test_setRankFractional_D1_SK1() result(assertion); logical(LK) :: assertion; end function
477#endif
478
479 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
480
481#if IK5_ENABLED
482 module function test_setRankFractional_D1_IK5() result(assertion); logical(LK) :: assertion; end function
483#endif
484#if IK4_ENABLED
485 module function test_setRankFractional_D1_IK4() result(assertion); logical(LK) :: assertion; end function
486#endif
487#if IK3_ENABLED
488 module function test_setRankFractional_D1_IK3() result(assertion); logical(LK) :: assertion; end function
489#endif
490#if IK2_ENABLED
491 module function test_setRankFractional_D1_IK2() result(assertion); logical(LK) :: assertion; end function
492#endif
493#if IK1_ENABLED
494 module function test_setRankFractional_D1_IK1() result(assertion); logical(LK) :: assertion; end function
495#endif
496
497 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
498
499#if LK5_ENABLED
500 module function test_setRankFractional_D1_LK5() result(assertion); logical(LK) :: assertion; end function
501#endif
502#if LK4_ENABLED
503 module function test_setRankFractional_D1_LK4() result(assertion); logical(LK) :: assertion; end function
504#endif
505#if LK3_ENABLED
506 module function test_setRankFractional_D1_LK3() result(assertion); logical(LK) :: assertion; end function
507#endif
508#if LK2_ENABLED
509 module function test_setRankFractional_D1_LK2() result(assertion); logical(LK) :: assertion; end function
510#endif
511#if LK1_ENABLED
512 module function test_setRankFractional_D1_LK1() result(assertion); logical(LK) :: assertion; end function
513#endif
514
515 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
516
517#if CK5_ENABLED
518 module function test_setRankFractional_D1_CK5() result(assertion); logical(LK) :: assertion; end function
519#endif
520#if CK4_ENABLED
521 module function test_setRankFractional_D1_CK4() result(assertion); logical(LK) :: assertion; end function
522#endif
523#if CK3_ENABLED
524 module function test_setRankFractional_D1_CK3() result(assertion); logical(LK) :: assertion; end function
525#endif
526#if CK2_ENABLED
527 module function test_setRankFractional_D1_CK2() result(assertion); logical(LK) :: assertion; end function
528#endif
529#if CK1_ENABLED
530 module function test_setRankFractional_D1_CK1() result(assertion); logical(LK) :: assertion; end function
531#endif
532
533 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
534
535#if RK5_ENABLED
536 module function test_setRankFractional_D1_RK5() result(assertion); logical(LK) :: assertion; end function
537#endif
538#if RK4_ENABLED
539 module function test_setRankFractional_D1_RK4() result(assertion); logical(LK) :: assertion; end function
540#endif
541#if RK3_ENABLED
542 module function test_setRankFractional_D1_RK3() result(assertion); logical(LK) :: assertion; end function
543#endif
544#if RK2_ENABLED
545 module function test_setRankFractional_D1_RK2() result(assertion); logical(LK) :: assertion; end function
546#endif
547#if RK1_ENABLED
548 module function test_setRankFractional_D1_RK1() result(assertion); logical(LK) :: assertion; end function
549#endif
550
551 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
552
553#if SK5_ENABLED
554 module function test_setRankFractional_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
555#endif
556#if SK4_ENABLED
557 module function test_setRankFractional_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
558#endif
559#if SK3_ENABLED
560 module function test_setRankFractional_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
561#endif
562#if SK2_ENABLED
563 module function test_setRankFractional_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
564#endif
565#if SK1_ENABLED
566 module function test_setRankFractional_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
567#endif
568
569 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
570
571 end interface
572
573!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
574
575 interface
576
577 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
578
579#if SK5_ENABLED
580 module function test_getRankModified_D0_SK5() result(assertion); logical(LK) :: assertion; end function
581#endif
582#if SK4_ENABLED
583 module function test_getRankModified_D0_SK4() result(assertion); logical(LK) :: assertion; end function
584#endif
585#if SK3_ENABLED
586 module function test_getRankModified_D0_SK3() result(assertion); logical(LK) :: assertion; end function
587#endif
588#if SK2_ENABLED
589 module function test_getRankModified_D0_SK2() result(assertion); logical(LK) :: assertion; end function
590#endif
591#if SK1_ENABLED
592 module function test_getRankModified_D0_SK1() result(assertion); logical(LK) :: assertion; end function
593#endif
594
595 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
596
597#if SK5_ENABLED
598 module function test_getRankModified_D1_SK5() result(assertion); logical(LK) :: assertion; end function
599#endif
600#if SK4_ENABLED
601 module function test_getRankModified_D1_SK4() result(assertion); logical(LK) :: assertion; end function
602#endif
603#if SK3_ENABLED
604 module function test_getRankModified_D1_SK3() result(assertion); logical(LK) :: assertion; end function
605#endif
606#if SK2_ENABLED
607 module function test_getRankModified_D1_SK2() result(assertion); logical(LK) :: assertion; end function
608#endif
609#if SK1_ENABLED
610 module function test_getRankModified_D1_SK1() result(assertion); logical(LK) :: assertion; end function
611#endif
612
613 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
614
615#if IK5_ENABLED
616 module function test_getRankModified_D1_IK5() result(assertion); logical(LK) :: assertion; end function
617#endif
618#if IK4_ENABLED
619 module function test_getRankModified_D1_IK4() result(assertion); logical(LK) :: assertion; end function
620#endif
621#if IK3_ENABLED
622 module function test_getRankModified_D1_IK3() result(assertion); logical(LK) :: assertion; end function
623#endif
624#if IK2_ENABLED
625 module function test_getRankModified_D1_IK2() result(assertion); logical(LK) :: assertion; end function
626#endif
627#if IK1_ENABLED
628 module function test_getRankModified_D1_IK1() result(assertion); logical(LK) :: assertion; end function
629#endif
630
631 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
632
633#if LK5_ENABLED
634 module function test_getRankModified_D1_LK5() result(assertion); logical(LK) :: assertion; end function
635#endif
636#if LK4_ENABLED
637 module function test_getRankModified_D1_LK4() result(assertion); logical(LK) :: assertion; end function
638#endif
639#if LK3_ENABLED
640 module function test_getRankModified_D1_LK3() result(assertion); logical(LK) :: assertion; end function
641#endif
642#if LK2_ENABLED
643 module function test_getRankModified_D1_LK2() result(assertion); logical(LK) :: assertion; end function
644#endif
645#if LK1_ENABLED
646 module function test_getRankModified_D1_LK1() result(assertion); logical(LK) :: assertion; end function
647#endif
648
649 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
650
651#if CK5_ENABLED
652 module function test_getRankModified_D1_CK5() result(assertion); logical(LK) :: assertion; end function
653#endif
654#if CK4_ENABLED
655 module function test_getRankModified_D1_CK4() result(assertion); logical(LK) :: assertion; end function
656#endif
657#if CK3_ENABLED
658 module function test_getRankModified_D1_CK3() result(assertion); logical(LK) :: assertion; end function
659#endif
660#if CK2_ENABLED
661 module function test_getRankModified_D1_CK2() result(assertion); logical(LK) :: assertion; end function
662#endif
663#if CK1_ENABLED
664 module function test_getRankModified_D1_CK1() result(assertion); logical(LK) :: assertion; end function
665#endif
666
667 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
668
669#if RK5_ENABLED
670 module function test_getRankModified_D1_RK5() result(assertion); logical(LK) :: assertion; end function
671#endif
672#if RK4_ENABLED
673 module function test_getRankModified_D1_RK4() result(assertion); logical(LK) :: assertion; end function
674#endif
675#if RK3_ENABLED
676 module function test_getRankModified_D1_RK3() result(assertion); logical(LK) :: assertion; end function
677#endif
678#if RK2_ENABLED
679 module function test_getRankModified_D1_RK2() result(assertion); logical(LK) :: assertion; end function
680#endif
681#if RK1_ENABLED
682 module function test_getRankModified_D1_RK1() result(assertion); logical(LK) :: assertion; end function
683#endif
684
685 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
686
687#if SK5_ENABLED
688 module function test_getRankModified_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
689#endif
690#if SK4_ENABLED
691 module function test_getRankModified_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
692#endif
693#if SK3_ENABLED
694 module function test_getRankModified_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
695#endif
696#if SK2_ENABLED
697 module function test_getRankModified_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
698#endif
699#if SK1_ENABLED
700 module function test_getRankModified_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
701#endif
702
703 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
704
705 end interface
706
707!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
708
709 interface
710
711 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
712
713#if SK5_ENABLED
714 module function test_setRankModified_D0_SK5() result(assertion); logical(LK) :: assertion; end function
715#endif
716#if SK4_ENABLED
717 module function test_setRankModified_D0_SK4() result(assertion); logical(LK) :: assertion; end function
718#endif
719#if SK3_ENABLED
720 module function test_setRankModified_D0_SK3() result(assertion); logical(LK) :: assertion; end function
721#endif
722#if SK2_ENABLED
723 module function test_setRankModified_D0_SK2() result(assertion); logical(LK) :: assertion; end function
724#endif
725#if SK1_ENABLED
726 module function test_setRankModified_D0_SK1() result(assertion); logical(LK) :: assertion; end function
727#endif
728
729 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
730
731#if SK5_ENABLED
732 module function test_setRankModified_D1_SK5() result(assertion); logical(LK) :: assertion; end function
733#endif
734#if SK4_ENABLED
735 module function test_setRankModified_D1_SK4() result(assertion); logical(LK) :: assertion; end function
736#endif
737#if SK3_ENABLED
738 module function test_setRankModified_D1_SK3() result(assertion); logical(LK) :: assertion; end function
739#endif
740#if SK2_ENABLED
741 module function test_setRankModified_D1_SK2() result(assertion); logical(LK) :: assertion; end function
742#endif
743#if SK1_ENABLED
744 module function test_setRankModified_D1_SK1() result(assertion); logical(LK) :: assertion; end function
745#endif
746
747 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
748
749#if IK5_ENABLED
750 module function test_setRankModified_D1_IK5() result(assertion); logical(LK) :: assertion; end function
751#endif
752#if IK4_ENABLED
753 module function test_setRankModified_D1_IK4() result(assertion); logical(LK) :: assertion; end function
754#endif
755#if IK3_ENABLED
756 module function test_setRankModified_D1_IK3() result(assertion); logical(LK) :: assertion; end function
757#endif
758#if IK2_ENABLED
759 module function test_setRankModified_D1_IK2() result(assertion); logical(LK) :: assertion; end function
760#endif
761#if IK1_ENABLED
762 module function test_setRankModified_D1_IK1() result(assertion); logical(LK) :: assertion; end function
763#endif
764
765 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
766
767#if LK5_ENABLED
768 module function test_setRankModified_D1_LK5() result(assertion); logical(LK) :: assertion; end function
769#endif
770#if LK4_ENABLED
771 module function test_setRankModified_D1_LK4() result(assertion); logical(LK) :: assertion; end function
772#endif
773#if LK3_ENABLED
774 module function test_setRankModified_D1_LK3() result(assertion); logical(LK) :: assertion; end function
775#endif
776#if LK2_ENABLED
777 module function test_setRankModified_D1_LK2() result(assertion); logical(LK) :: assertion; end function
778#endif
779#if LK1_ENABLED
780 module function test_setRankModified_D1_LK1() result(assertion); logical(LK) :: assertion; end function
781#endif
782
783 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
784
785#if CK5_ENABLED
786 module function test_setRankModified_D1_CK5() result(assertion); logical(LK) :: assertion; end function
787#endif
788#if CK4_ENABLED
789 module function test_setRankModified_D1_CK4() result(assertion); logical(LK) :: assertion; end function
790#endif
791#if CK3_ENABLED
792 module function test_setRankModified_D1_CK3() result(assertion); logical(LK) :: assertion; end function
793#endif
794#if CK2_ENABLED
795 module function test_setRankModified_D1_CK2() result(assertion); logical(LK) :: assertion; end function
796#endif
797#if CK1_ENABLED
798 module function test_setRankModified_D1_CK1() result(assertion); logical(LK) :: assertion; end function
799#endif
800
801 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
802
803#if RK5_ENABLED
804 module function test_setRankModified_D1_RK5() result(assertion); logical(LK) :: assertion; end function
805#endif
806#if RK4_ENABLED
807 module function test_setRankModified_D1_RK4() result(assertion); logical(LK) :: assertion; end function
808#endif
809#if RK3_ENABLED
810 module function test_setRankModified_D1_RK3() result(assertion); logical(LK) :: assertion; end function
811#endif
812#if RK2_ENABLED
813 module function test_setRankModified_D1_RK2() result(assertion); logical(LK) :: assertion; end function
814#endif
815#if RK1_ENABLED
816 module function test_setRankModified_D1_RK1() result(assertion); logical(LK) :: assertion; end function
817#endif
818
819 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
820
821#if SK5_ENABLED
822 module function test_setRankModified_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
823#endif
824#if SK4_ENABLED
825 module function test_setRankModified_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
826#endif
827#if SK3_ENABLED
828 module function test_setRankModified_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
829#endif
830#if SK2_ENABLED
831 module function test_setRankModified_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
832#endif
833#if SK1_ENABLED
834 module function test_setRankModified_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
835#endif
836
837 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
838
839 end interface
840
841!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
842
843 interface
844
845 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
846
847#if SK5_ENABLED
848 module function test_getRankOrdinal_D0_SK5() result(assertion); logical(LK) :: assertion; end function
849#endif
850#if SK4_ENABLED
851 module function test_getRankOrdinal_D0_SK4() result(assertion); logical(LK) :: assertion; end function
852#endif
853#if SK3_ENABLED
854 module function test_getRankOrdinal_D0_SK3() result(assertion); logical(LK) :: assertion; end function
855#endif
856#if SK2_ENABLED
857 module function test_getRankOrdinal_D0_SK2() result(assertion); logical(LK) :: assertion; end function
858#endif
859#if SK1_ENABLED
860 module function test_getRankOrdinal_D0_SK1() result(assertion); logical(LK) :: assertion; end function
861#endif
862
863 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
864
865#if SK5_ENABLED
866 module function test_getRankOrdinal_D1_SK5() result(assertion); logical(LK) :: assertion; end function
867#endif
868#if SK4_ENABLED
869 module function test_getRankOrdinal_D1_SK4() result(assertion); logical(LK) :: assertion; end function
870#endif
871#if SK3_ENABLED
872 module function test_getRankOrdinal_D1_SK3() result(assertion); logical(LK) :: assertion; end function
873#endif
874#if SK2_ENABLED
875 module function test_getRankOrdinal_D1_SK2() result(assertion); logical(LK) :: assertion; end function
876#endif
877#if SK1_ENABLED
878 module function test_getRankOrdinal_D1_SK1() result(assertion); logical(LK) :: assertion; end function
879#endif
880
881 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
882
883#if IK5_ENABLED
884 module function test_getRankOrdinal_D1_IK5() result(assertion); logical(LK) :: assertion; end function
885#endif
886#if IK4_ENABLED
887 module function test_getRankOrdinal_D1_IK4() result(assertion); logical(LK) :: assertion; end function
888#endif
889#if IK3_ENABLED
890 module function test_getRankOrdinal_D1_IK3() result(assertion); logical(LK) :: assertion; end function
891#endif
892#if IK2_ENABLED
893 module function test_getRankOrdinal_D1_IK2() result(assertion); logical(LK) :: assertion; end function
894#endif
895#if IK1_ENABLED
896 module function test_getRankOrdinal_D1_IK1() result(assertion); logical(LK) :: assertion; end function
897#endif
898
899 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
900
901#if LK5_ENABLED
902 module function test_getRankOrdinal_D1_LK5() result(assertion); logical(LK) :: assertion; end function
903#endif
904#if LK4_ENABLED
905 module function test_getRankOrdinal_D1_LK4() result(assertion); logical(LK) :: assertion; end function
906#endif
907#if LK3_ENABLED
908 module function test_getRankOrdinal_D1_LK3() result(assertion); logical(LK) :: assertion; end function
909#endif
910#if LK2_ENABLED
911 module function test_getRankOrdinal_D1_LK2() result(assertion); logical(LK) :: assertion; end function
912#endif
913#if LK1_ENABLED
914 module function test_getRankOrdinal_D1_LK1() result(assertion); logical(LK) :: assertion; end function
915#endif
916
917 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
918
919#if CK5_ENABLED
920 module function test_getRankOrdinal_D1_CK5() result(assertion); logical(LK) :: assertion; end function
921#endif
922#if CK4_ENABLED
923 module function test_getRankOrdinal_D1_CK4() result(assertion); logical(LK) :: assertion; end function
924#endif
925#if CK3_ENABLED
926 module function test_getRankOrdinal_D1_CK3() result(assertion); logical(LK) :: assertion; end function
927#endif
928#if CK2_ENABLED
929 module function test_getRankOrdinal_D1_CK2() result(assertion); logical(LK) :: assertion; end function
930#endif
931#if CK1_ENABLED
932 module function test_getRankOrdinal_D1_CK1() result(assertion); logical(LK) :: assertion; end function
933#endif
934
935 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
936
937#if RK5_ENABLED
938 module function test_getRankOrdinal_D1_RK5() result(assertion); logical(LK) :: assertion; end function
939#endif
940#if RK4_ENABLED
941 module function test_getRankOrdinal_D1_RK4() result(assertion); logical(LK) :: assertion; end function
942#endif
943#if RK3_ENABLED
944 module function test_getRankOrdinal_D1_RK3() result(assertion); logical(LK) :: assertion; end function
945#endif
946#if RK2_ENABLED
947 module function test_getRankOrdinal_D1_RK2() result(assertion); logical(LK) :: assertion; end function
948#endif
949#if RK1_ENABLED
950 module function test_getRankOrdinal_D1_RK1() result(assertion); logical(LK) :: assertion; end function
951#endif
952
953 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
954
955#if SK5_ENABLED
956 module function test_getRankOrdinal_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
957#endif
958#if SK4_ENABLED
959 module function test_getRankOrdinal_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
960#endif
961#if SK3_ENABLED
962 module function test_getRankOrdinal_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
963#endif
964#if SK2_ENABLED
965 module function test_getRankOrdinal_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
966#endif
967#if SK1_ENABLED
968 module function test_getRankOrdinal_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
969#endif
970
971 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
972
973 end interface
974
975!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
976
977 interface
978
979 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
980
981#if SK5_ENABLED
982 module function test_setRankOrdinal_D0_SK5() result(assertion); logical(LK) :: assertion; end function
983#endif
984#if SK4_ENABLED
985 module function test_setRankOrdinal_D0_SK4() result(assertion); logical(LK) :: assertion; end function
986#endif
987#if SK3_ENABLED
988 module function test_setRankOrdinal_D0_SK3() result(assertion); logical(LK) :: assertion; end function
989#endif
990#if SK2_ENABLED
991 module function test_setRankOrdinal_D0_SK2() result(assertion); logical(LK) :: assertion; end function
992#endif
993#if SK1_ENABLED
994 module function test_setRankOrdinal_D0_SK1() result(assertion); logical(LK) :: assertion; end function
995#endif
996
997 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
998
999#if SK5_ENABLED
1000 module function test_setRankOrdinal_D1_SK5() result(assertion); logical(LK) :: assertion; end function
1001#endif
1002#if SK4_ENABLED
1003 module function test_setRankOrdinal_D1_SK4() result(assertion); logical(LK) :: assertion; end function
1004#endif
1005#if SK3_ENABLED
1006 module function test_setRankOrdinal_D1_SK3() result(assertion); logical(LK) :: assertion; end function
1007#endif
1008#if SK2_ENABLED
1009 module function test_setRankOrdinal_D1_SK2() result(assertion); logical(LK) :: assertion; end function
1010#endif
1011#if SK1_ENABLED
1012 module function test_setRankOrdinal_D1_SK1() result(assertion); logical(LK) :: assertion; end function
1013#endif
1014
1015 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1016
1017#if IK5_ENABLED
1018 module function test_setRankOrdinal_D1_IK5() result(assertion); logical(LK) :: assertion; end function
1019#endif
1020#if IK4_ENABLED
1021 module function test_setRankOrdinal_D1_IK4() result(assertion); logical(LK) :: assertion; end function
1022#endif
1023#if IK3_ENABLED
1024 module function test_setRankOrdinal_D1_IK3() result(assertion); logical(LK) :: assertion; end function
1025#endif
1026#if IK2_ENABLED
1027 module function test_setRankOrdinal_D1_IK2() result(assertion); logical(LK) :: assertion; end function
1028#endif
1029#if IK1_ENABLED
1030 module function test_setRankOrdinal_D1_IK1() result(assertion); logical(LK) :: assertion; end function
1031#endif
1032
1033 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1034
1035#if LK5_ENABLED
1036 module function test_setRankOrdinal_D1_LK5() result(assertion); logical(LK) :: assertion; end function
1037#endif
1038#if LK4_ENABLED
1039 module function test_setRankOrdinal_D1_LK4() result(assertion); logical(LK) :: assertion; end function
1040#endif
1041#if LK3_ENABLED
1042 module function test_setRankOrdinal_D1_LK3() result(assertion); logical(LK) :: assertion; end function
1043#endif
1044#if LK2_ENABLED
1045 module function test_setRankOrdinal_D1_LK2() result(assertion); logical(LK) :: assertion; end function
1046#endif
1047#if LK1_ENABLED
1048 module function test_setRankOrdinal_D1_LK1() result(assertion); logical(LK) :: assertion; end function
1049#endif
1050
1051 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1052
1053#if CK5_ENABLED
1054 module function test_setRankOrdinal_D1_CK5() result(assertion); logical(LK) :: assertion; end function
1055#endif
1056#if CK4_ENABLED
1057 module function test_setRankOrdinal_D1_CK4() result(assertion); logical(LK) :: assertion; end function
1058#endif
1059#if CK3_ENABLED
1060 module function test_setRankOrdinal_D1_CK3() result(assertion); logical(LK) :: assertion; end function
1061#endif
1062#if CK2_ENABLED
1063 module function test_setRankOrdinal_D1_CK2() result(assertion); logical(LK) :: assertion; end function
1064#endif
1065#if CK1_ENABLED
1066 module function test_setRankOrdinal_D1_CK1() result(assertion); logical(LK) :: assertion; end function
1067#endif
1068
1069 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1070
1071#if RK5_ENABLED
1072 module function test_setRankOrdinal_D1_RK5() result(assertion); logical(LK) :: assertion; end function
1073#endif
1074#if RK4_ENABLED
1075 module function test_setRankOrdinal_D1_RK4() result(assertion); logical(LK) :: assertion; end function
1076#endif
1077#if RK3_ENABLED
1078 module function test_setRankOrdinal_D1_RK3() result(assertion); logical(LK) :: assertion; end function
1079#endif
1080#if RK2_ENABLED
1081 module function test_setRankOrdinal_D1_RK2() result(assertion); logical(LK) :: assertion; end function
1082#endif
1083#if RK1_ENABLED
1084 module function test_setRankOrdinal_D1_RK1() result(assertion); logical(LK) :: assertion; end function
1085#endif
1086
1087 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1088
1089#if SK5_ENABLED
1090 module function test_setRankOrdinal_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
1091#endif
1092#if SK4_ENABLED
1093 module function test_setRankOrdinal_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
1094#endif
1095#if SK3_ENABLED
1096 module function test_setRankOrdinal_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
1097#endif
1098#if SK2_ENABLED
1099 module function test_setRankOrdinal_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
1100#endif
1101#if SK1_ENABLED
1102 module function test_setRankOrdinal_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
1103#endif
1104
1105 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1106
1107 end interface
1108
1109!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1110
1111 interface
1112
1113 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1114
1115#if SK5_ENABLED
1116 module function test_getRankStandard_D0_SK5() result(assertion); logical(LK) :: assertion; end function
1117#endif
1118#if SK4_ENABLED
1119 module function test_getRankStandard_D0_SK4() result(assertion); logical(LK) :: assertion; end function
1120#endif
1121#if SK3_ENABLED
1122 module function test_getRankStandard_D0_SK3() result(assertion); logical(LK) :: assertion; end function
1123#endif
1124#if SK2_ENABLED
1125 module function test_getRankStandard_D0_SK2() result(assertion); logical(LK) :: assertion; end function
1126#endif
1127#if SK1_ENABLED
1128 module function test_getRankStandard_D0_SK1() result(assertion); logical(LK) :: assertion; end function
1129#endif
1130
1131 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1132
1133#if SK5_ENABLED
1134 module function test_getRankStandard_D1_SK5() result(assertion); logical(LK) :: assertion; end function
1135#endif
1136#if SK4_ENABLED
1137 module function test_getRankStandard_D1_SK4() result(assertion); logical(LK) :: assertion; end function
1138#endif
1139#if SK3_ENABLED
1140 module function test_getRankStandard_D1_SK3() result(assertion); logical(LK) :: assertion; end function
1141#endif
1142#if SK2_ENABLED
1143 module function test_getRankStandard_D1_SK2() result(assertion); logical(LK) :: assertion; end function
1144#endif
1145#if SK1_ENABLED
1146 module function test_getRankStandard_D1_SK1() result(assertion); logical(LK) :: assertion; end function
1147#endif
1148
1149 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1150
1151#if IK5_ENABLED
1152 module function test_getRankStandard_D1_IK5() result(assertion); logical(LK) :: assertion; end function
1153#endif
1154#if IK4_ENABLED
1155 module function test_getRankStandard_D1_IK4() result(assertion); logical(LK) :: assertion; end function
1156#endif
1157#if IK3_ENABLED
1158 module function test_getRankStandard_D1_IK3() result(assertion); logical(LK) :: assertion; end function
1159#endif
1160#if IK2_ENABLED
1161 module function test_getRankStandard_D1_IK2() result(assertion); logical(LK) :: assertion; end function
1162#endif
1163#if IK1_ENABLED
1164 module function test_getRankStandard_D1_IK1() result(assertion); logical(LK) :: assertion; end function
1165#endif
1166
1167 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1168
1169#if LK5_ENABLED
1170 module function test_getRankStandard_D1_LK5() result(assertion); logical(LK) :: assertion; end function
1171#endif
1172#if LK4_ENABLED
1173 module function test_getRankStandard_D1_LK4() result(assertion); logical(LK) :: assertion; end function
1174#endif
1175#if LK3_ENABLED
1176 module function test_getRankStandard_D1_LK3() result(assertion); logical(LK) :: assertion; end function
1177#endif
1178#if LK2_ENABLED
1179 module function test_getRankStandard_D1_LK2() result(assertion); logical(LK) :: assertion; end function
1180#endif
1181#if LK1_ENABLED
1182 module function test_getRankStandard_D1_LK1() result(assertion); logical(LK) :: assertion; end function
1183#endif
1184
1185 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1186
1187#if CK5_ENABLED
1188 module function test_getRankStandard_D1_CK5() result(assertion); logical(LK) :: assertion; end function
1189#endif
1190#if CK4_ENABLED
1191 module function test_getRankStandard_D1_CK4() result(assertion); logical(LK) :: assertion; end function
1192#endif
1193#if CK3_ENABLED
1194 module function test_getRankStandard_D1_CK3() result(assertion); logical(LK) :: assertion; end function
1195#endif
1196#if CK2_ENABLED
1197 module function test_getRankStandard_D1_CK2() result(assertion); logical(LK) :: assertion; end function
1198#endif
1199#if CK1_ENABLED
1200 module function test_getRankStandard_D1_CK1() result(assertion); logical(LK) :: assertion; end function
1201#endif
1202
1203 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1204
1205#if RK5_ENABLED
1206 module function test_getRankStandard_D1_RK5() result(assertion); logical(LK) :: assertion; end function
1207#endif
1208#if RK4_ENABLED
1209 module function test_getRankStandard_D1_RK4() result(assertion); logical(LK) :: assertion; end function
1210#endif
1211#if RK3_ENABLED
1212 module function test_getRankStandard_D1_RK3() result(assertion); logical(LK) :: assertion; end function
1213#endif
1214#if RK2_ENABLED
1215 module function test_getRankStandard_D1_RK2() result(assertion); logical(LK) :: assertion; end function
1216#endif
1217#if RK1_ENABLED
1218 module function test_getRankStandard_D1_RK1() result(assertion); logical(LK) :: assertion; end function
1219#endif
1220
1221 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1222
1223#if SK5_ENABLED
1224 module function test_getRankStandard_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
1225#endif
1226#if SK4_ENABLED
1227 module function test_getRankStandard_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
1228#endif
1229#if SK3_ENABLED
1230 module function test_getRankStandard_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
1231#endif
1232#if SK2_ENABLED
1233 module function test_getRankStandard_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
1234#endif
1235#if SK1_ENABLED
1236 module function test_getRankStandard_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
1237#endif
1238
1239 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1240
1241 end interface
1242
1243!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1244
1245 interface
1246
1247 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1248
1249#if SK5_ENABLED
1250 module function test_setRankStandard_D0_SK5() result(assertion); logical(LK) :: assertion; end function
1251#endif
1252#if SK4_ENABLED
1253 module function test_setRankStandard_D0_SK4() result(assertion); logical(LK) :: assertion; end function
1254#endif
1255#if SK3_ENABLED
1256 module function test_setRankStandard_D0_SK3() result(assertion); logical(LK) :: assertion; end function
1257#endif
1258#if SK2_ENABLED
1259 module function test_setRankStandard_D0_SK2() result(assertion); logical(LK) :: assertion; end function
1260#endif
1261#if SK1_ENABLED
1262 module function test_setRankStandard_D0_SK1() result(assertion); logical(LK) :: assertion; end function
1263#endif
1264
1265 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1266
1267#if SK5_ENABLED
1268 module function test_setRankStandard_D1_SK5() result(assertion); logical(LK) :: assertion; end function
1269#endif
1270#if SK4_ENABLED
1271 module function test_setRankStandard_D1_SK4() result(assertion); logical(LK) :: assertion; end function
1272#endif
1273#if SK3_ENABLED
1274 module function test_setRankStandard_D1_SK3() result(assertion); logical(LK) :: assertion; end function
1275#endif
1276#if SK2_ENABLED
1277 module function test_setRankStandard_D1_SK2() result(assertion); logical(LK) :: assertion; end function
1278#endif
1279#if SK1_ENABLED
1280 module function test_setRankStandard_D1_SK1() result(assertion); logical(LK) :: assertion; end function
1281#endif
1282
1283 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1284
1285#if IK5_ENABLED
1286 module function test_setRankStandard_D1_IK5() result(assertion); logical(LK) :: assertion; end function
1287#endif
1288#if IK4_ENABLED
1289 module function test_setRankStandard_D1_IK4() result(assertion); logical(LK) :: assertion; end function
1290#endif
1291#if IK3_ENABLED
1292 module function test_setRankStandard_D1_IK3() result(assertion); logical(LK) :: assertion; end function
1293#endif
1294#if IK2_ENABLED
1295 module function test_setRankStandard_D1_IK2() result(assertion); logical(LK) :: assertion; end function
1296#endif
1297#if IK1_ENABLED
1298 module function test_setRankStandard_D1_IK1() result(assertion); logical(LK) :: assertion; end function
1299#endif
1300
1301 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1302
1303#if LK5_ENABLED
1304 module function test_setRankStandard_D1_LK5() result(assertion); logical(LK) :: assertion; end function
1305#endif
1306#if LK4_ENABLED
1307 module function test_setRankStandard_D1_LK4() result(assertion); logical(LK) :: assertion; end function
1308#endif
1309#if LK3_ENABLED
1310 module function test_setRankStandard_D1_LK3() result(assertion); logical(LK) :: assertion; end function
1311#endif
1312#if LK2_ENABLED
1313 module function test_setRankStandard_D1_LK2() result(assertion); logical(LK) :: assertion; end function
1314#endif
1315#if LK1_ENABLED
1316 module function test_setRankStandard_D1_LK1() result(assertion); logical(LK) :: assertion; end function
1317#endif
1318
1319 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1320
1321#if CK5_ENABLED
1322 module function test_setRankStandard_D1_CK5() result(assertion); logical(LK) :: assertion; end function
1323#endif
1324#if CK4_ENABLED
1325 module function test_setRankStandard_D1_CK4() result(assertion); logical(LK) :: assertion; end function
1326#endif
1327#if CK3_ENABLED
1328 module function test_setRankStandard_D1_CK3() result(assertion); logical(LK) :: assertion; end function
1329#endif
1330#if CK2_ENABLED
1331 module function test_setRankStandard_D1_CK2() result(assertion); logical(LK) :: assertion; end function
1332#endif
1333#if CK1_ENABLED
1334 module function test_setRankStandard_D1_CK1() result(assertion); logical(LK) :: assertion; end function
1335#endif
1336
1337 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1338
1339#if RK5_ENABLED
1340 module function test_setRankStandard_D1_RK5() result(assertion); logical(LK) :: assertion; end function
1341#endif
1342#if RK4_ENABLED
1343 module function test_setRankStandard_D1_RK4() result(assertion); logical(LK) :: assertion; end function
1344#endif
1345#if RK3_ENABLED
1346 module function test_setRankStandard_D1_RK3() result(assertion); logical(LK) :: assertion; end function
1347#endif
1348#if RK2_ENABLED
1349 module function test_setRankStandard_D1_RK2() result(assertion); logical(LK) :: assertion; end function
1350#endif
1351#if RK1_ENABLED
1352 module function test_setRankStandard_D1_RK1() result(assertion); logical(LK) :: assertion; end function
1353#endif
1354
1355 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1356
1357#if SK5_ENABLED
1358 module function test_setRankStandard_D1_PSSK5() result(assertion); logical(LK) :: assertion; end function
1359#endif
1360#if SK4_ENABLED
1361 module function test_setRankStandard_D1_PSSK4() result(assertion); logical(LK) :: assertion; end function
1362#endif
1363#if SK3_ENABLED
1364 module function test_setRankStandard_D1_PSSK3() result(assertion); logical(LK) :: assertion; end function
1365#endif
1366#if SK2_ENABLED
1367 module function test_setRankStandard_D1_PSSK2() result(assertion); logical(LK) :: assertion; end function
1368#endif
1369#if SK1_ENABLED
1370 module function test_setRankStandard_D1_PSSK1() result(assertion); logical(LK) :: assertion; end function
1371#endif
1372
1373 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1374
1375 end interface
1376
1377!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1378
1379contains
1380
1381!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1382
1383 subroutine setTest()
1384
1385 test = test_type(MODULE_NAME)
1386
1387 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1388
1389 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1390 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1391 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1392
1393 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1394
1395#if SK5_ENABLED
1396 call test%run(test_getRankDense_D0_SK5, SK_"test_getRankDense_D0_SK5")
1397#endif
1398#if SK4_ENABLED
1399 call test%run(test_getRankDense_D0_SK4, SK_"test_getRankDense_D0_SK4")
1400#endif
1401#if SK3_ENABLED
1402 call test%run(test_getRankDense_D0_SK3, SK_"test_getRankDense_D0_SK3")
1403#endif
1404#if SK2_ENABLED
1405 call test%run(test_getRankDense_D0_SK2, SK_"test_getRankDense_D0_SK2")
1406#endif
1407#if SK1_ENABLED
1408 call test%run(test_getRankDense_D0_SK1, SK_"test_getRankDense_D0_SK1")
1409#endif
1410
1411 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1412
1413#if SK5_ENABLED
1414 call test%run(test_getRankDense_D1_SK5, SK_"test_getRankDense_D1_SK5")
1415#endif
1416#if SK4_ENABLED
1417 call test%run(test_getRankDense_D1_SK4, SK_"test_getRankDense_D1_SK4")
1418#endif
1419#if SK3_ENABLED
1420 call test%run(test_getRankDense_D1_SK3, SK_"test_getRankDense_D1_SK3")
1421#endif
1422#if SK2_ENABLED
1423 call test%run(test_getRankDense_D1_SK2, SK_"test_getRankDense_D1_SK2")
1424#endif
1425#if SK1_ENABLED
1426 call test%run(test_getRankDense_D1_SK1, SK_"test_getRankDense_D1_SK1")
1427#endif
1428
1429 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1430
1431#if IK5_ENABLED
1432 call test%run(test_getRankDense_D1_IK5, SK_"test_getRankDense_D1_IK5")
1433#endif
1434#if IK4_ENABLED
1435 call test%run(test_getRankDense_D1_IK4, SK_"test_getRankDense_D1_IK4")
1436#endif
1437#if IK3_ENABLED
1438 call test%run(test_getRankDense_D1_IK3, SK_"test_getRankDense_D1_IK3")
1439#endif
1440#if IK2_ENABLED
1441 call test%run(test_getRankDense_D1_IK2, SK_"test_getRankDense_D1_IK2")
1442#endif
1443#if IK1_ENABLED
1444 call test%run(test_getRankDense_D1_IK1, SK_"test_getRankDense_D1_IK1")
1445#endif
1446
1447 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1448
1449#if LK5_ENABLED
1450 call test%run(test_getRankDense_D1_LK5, SK_"test_getRankDense_D1_LK5")
1451#endif
1452#if LK4_ENABLED
1453 call test%run(test_getRankDense_D1_LK4, SK_"test_getRankDense_D1_LK4")
1454#endif
1455#if LK3_ENABLED
1456 call test%run(test_getRankDense_D1_LK3, SK_"test_getRankDense_D1_LK3")
1457#endif
1458#if LK2_ENABLED
1459 call test%run(test_getRankDense_D1_LK2, SK_"test_getRankDense_D1_LK2")
1460#endif
1461#if LK1_ENABLED
1462 call test%run(test_getRankDense_D1_LK1, SK_"test_getRankDense_D1_LK1")
1463#endif
1464
1465 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1466
1467#if CK5_ENABLED
1468 call test%run(test_getRankDense_D1_CK5, SK_"test_getRankDense_D1_CK5")
1469#endif
1470#if CK4_ENABLED
1471 call test%run(test_getRankDense_D1_CK4, SK_"test_getRankDense_D1_CK4")
1472#endif
1473#if CK3_ENABLED
1474 call test%run(test_getRankDense_D1_CK3, SK_"test_getRankDense_D1_CK3")
1475#endif
1476#if CK2_ENABLED
1477 call test%run(test_getRankDense_D1_CK2, SK_"test_getRankDense_D1_CK2")
1478#endif
1479#if CK1_ENABLED
1480 call test%run(test_getRankDense_D1_CK1, SK_"test_getRankDense_D1_CK1")
1481#endif
1482
1483 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1484
1485#if RK5_ENABLED
1486 call test%run(test_getRankDense_D1_RK5, SK_"test_getRankDense_D1_RK5")
1487#endif
1488#if RK4_ENABLED
1489 call test%run(test_getRankDense_D1_RK4, SK_"test_getRankDense_D1_RK4")
1490#endif
1491#if RK3_ENABLED
1492 call test%run(test_getRankDense_D1_RK3, SK_"test_getRankDense_D1_RK3")
1493#endif
1494#if RK2_ENABLED
1495 call test%run(test_getRankDense_D1_RK2, SK_"test_getRankDense_D1_RK2")
1496#endif
1497#if RK1_ENABLED
1498 call test%run(test_getRankDense_D1_RK1, SK_"test_getRankDense_D1_RK1")
1499#endif
1500
1501 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1502
1503#if PDT_ENABLED
1504#if SK5_ENABLED
1505 call test%run(test_getRankDense_D1_PSSK5, SK_"test_getRankDense_D1_PSSK5")
1506#endif
1507#if SK4_ENABLED
1508 call test%run(test_getRankDense_D1_PSSK4, SK_"test_getRankDense_D1_PSSK4")
1509#endif
1510#if SK3_ENABLED
1511 call test%run(test_getRankDense_D1_PSSK3, SK_"test_getRankDense_D1_PSSK3")
1512#endif
1513#if SK2_ENABLED
1514 call test%run(test_getRankDense_D1_PSSK2, SK_"test_getRankDense_D1_PSSK2")
1515#endif
1516#if SK1_ENABLED
1517 call test%run(test_getRankDense_D1_PSSK1, SK_"test_getRankDense_D1_PSSK1")
1518#endif
1519#endif
1520
1521 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1522
1523 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1524 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1525 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1526
1527 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1528
1529 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1530 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1531 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1532
1533 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1534
1535#if SK5_ENABLED
1536 call test%run(test_setRankDense_D0_SK5, SK_"test_setRankDense_D0_SK5")
1537#endif
1538#if SK4_ENABLED
1539 call test%run(test_setRankDense_D0_SK4, SK_"test_setRankDense_D0_SK4")
1540#endif
1541#if SK3_ENABLED
1542 call test%run(test_setRankDense_D0_SK3, SK_"test_setRankDense_D0_SK3")
1543#endif
1544#if SK2_ENABLED
1545 call test%run(test_setRankDense_D0_SK2, SK_"test_setRankDense_D0_SK2")
1546#endif
1547#if SK1_ENABLED
1548 call test%run(test_setRankDense_D0_SK1, SK_"test_setRankDense_D0_SK1")
1549#endif
1550
1551 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1552
1553#if SK5_ENABLED
1554 call test%run(test_setRankDense_D1_SK5, SK_"test_setRankDense_D1_SK5")
1555#endif
1556#if SK4_ENABLED
1557 call test%run(test_setRankDense_D1_SK4, SK_"test_setRankDense_D1_SK4")
1558#endif
1559#if SK3_ENABLED
1560 call test%run(test_setRankDense_D1_SK3, SK_"test_setRankDense_D1_SK3")
1561#endif
1562#if SK2_ENABLED
1563 call test%run(test_setRankDense_D1_SK2, SK_"test_setRankDense_D1_SK2")
1564#endif
1565#if SK1_ENABLED
1566 call test%run(test_setRankDense_D1_SK1, SK_"test_setRankDense_D1_SK1")
1567#endif
1568
1569 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1570
1571#if IK5_ENABLED
1572 call test%run(test_setRankDense_D1_IK5, SK_"test_setRankDense_D1_IK5")
1573#endif
1574#if IK4_ENABLED
1575 call test%run(test_setRankDense_D1_IK4, SK_"test_setRankDense_D1_IK4")
1576#endif
1577#if IK3_ENABLED
1578 call test%run(test_setRankDense_D1_IK3, SK_"test_setRankDense_D1_IK3")
1579#endif
1580#if IK2_ENABLED
1581 call test%run(test_setRankDense_D1_IK2, SK_"test_setRankDense_D1_IK2")
1582#endif
1583#if IK1_ENABLED
1584 call test%run(test_setRankDense_D1_IK1, SK_"test_setRankDense_D1_IK1")
1585#endif
1586
1587 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1588
1589#if LK5_ENABLED
1590 call test%run(test_setRankDense_D1_LK5, SK_"test_setRankDense_D1_LK5")
1591#endif
1592#if LK4_ENABLED
1593 call test%run(test_setRankDense_D1_LK4, SK_"test_setRankDense_D1_LK4")
1594#endif
1595#if LK3_ENABLED
1596 call test%run(test_setRankDense_D1_LK3, SK_"test_setRankDense_D1_LK3")
1597#endif
1598#if LK2_ENABLED
1599 call test%run(test_setRankDense_D1_LK2, SK_"test_setRankDense_D1_LK2")
1600#endif
1601#if LK1_ENABLED
1602 call test%run(test_setRankDense_D1_LK1, SK_"test_setRankDense_D1_LK1")
1603#endif
1604
1605 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1606
1607#if CK5_ENABLED
1608 call test%run(test_setRankDense_D1_CK5, SK_"test_setRankDense_D1_CK5")
1609#endif
1610#if CK4_ENABLED
1611 call test%run(test_setRankDense_D1_CK4, SK_"test_setRankDense_D1_CK4")
1612#endif
1613#if CK3_ENABLED
1614 call test%run(test_setRankDense_D1_CK3, SK_"test_setRankDense_D1_CK3")
1615#endif
1616#if CK2_ENABLED
1617 call test%run(test_setRankDense_D1_CK2, SK_"test_setRankDense_D1_CK2")
1618#endif
1619#if CK1_ENABLED
1620 call test%run(test_setRankDense_D1_CK1, SK_"test_setRankDense_D1_CK1")
1621#endif
1622
1623 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1624
1625#if RK5_ENABLED
1626 call test%run(test_setRankDense_D1_RK5, SK_"test_setRankDense_D1_RK5")
1627#endif
1628#if RK4_ENABLED
1629 call test%run(test_setRankDense_D1_RK4, SK_"test_setRankDense_D1_RK4")
1630#endif
1631#if RK3_ENABLED
1632 call test%run(test_setRankDense_D1_RK3, SK_"test_setRankDense_D1_RK3")
1633#endif
1634#if RK2_ENABLED
1635 call test%run(test_setRankDense_D1_RK2, SK_"test_setRankDense_D1_RK2")
1636#endif
1637#if RK1_ENABLED
1638 call test%run(test_setRankDense_D1_RK1, SK_"test_setRankDense_D1_RK1")
1639#endif
1640
1641 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1642
1643#if PDT_ENABLED
1644#if SK5_ENABLED
1645 call test%run(test_setRankDense_D1_PSSK5, SK_"test_setRankDense_D1_PSSK5")
1646#endif
1647#if SK4_ENABLED
1648 call test%run(test_setRankDense_D1_PSSK4, SK_"test_setRankDense_D1_PSSK4")
1649#endif
1650#if SK3_ENABLED
1651 call test%run(test_setRankDense_D1_PSSK3, SK_"test_setRankDense_D1_PSSK3")
1652#endif
1653#if SK2_ENABLED
1654 call test%run(test_setRankDense_D1_PSSK2, SK_"test_setRankDense_D1_PSSK2")
1655#endif
1656#if SK1_ENABLED
1657 call test%run(test_setRankDense_D1_PSSK1, SK_"test_setRankDense_D1_PSSK1")
1658#endif
1659#endif
1660
1661 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1662
1663 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1664 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1665 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1666
1667 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1668
1669 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1670 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1671 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1672
1673 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1674
1675#if SK5_ENABLED
1676 call test%run(test_getRankFractional_D0_SK5, SK_"test_getRankFractional_D0_SK5")
1677#endif
1678#if SK4_ENABLED
1679 call test%run(test_getRankFractional_D0_SK4, SK_"test_getRankFractional_D0_SK4")
1680#endif
1681#if SK3_ENABLED
1682 call test%run(test_getRankFractional_D0_SK3, SK_"test_getRankFractional_D0_SK3")
1683#endif
1684#if SK2_ENABLED
1685 call test%run(test_getRankFractional_D0_SK2, SK_"test_getRankFractional_D0_SK2")
1686#endif
1687#if SK1_ENABLED
1688 call test%run(test_getRankFractional_D0_SK1, SK_"test_getRankFractional_D0_SK1")
1689#endif
1690
1691 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1692
1693#if SK5_ENABLED
1694 call test%run(test_getRankFractional_D1_SK5, SK_"test_getRankFractional_D1_SK5")
1695#endif
1696#if SK4_ENABLED
1697 call test%run(test_getRankFractional_D1_SK4, SK_"test_getRankFractional_D1_SK4")
1698#endif
1699#if SK3_ENABLED
1700 call test%run(test_getRankFractional_D1_SK3, SK_"test_getRankFractional_D1_SK3")
1701#endif
1702#if SK2_ENABLED
1703 call test%run(test_getRankFractional_D1_SK2, SK_"test_getRankFractional_D1_SK2")
1704#endif
1705#if SK1_ENABLED
1706 call test%run(test_getRankFractional_D1_SK1, SK_"test_getRankFractional_D1_SK1")
1707#endif
1708
1709 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1710
1711#if IK5_ENABLED
1712 call test%run(test_getRankFractional_D1_IK5, SK_"test_getRankFractional_D1_IK5")
1713#endif
1714#if IK4_ENABLED
1715 call test%run(test_getRankFractional_D1_IK4, SK_"test_getRankFractional_D1_IK4")
1716#endif
1717#if IK3_ENABLED
1718 call test%run(test_getRankFractional_D1_IK3, SK_"test_getRankFractional_D1_IK3")
1719#endif
1720#if IK2_ENABLED
1721 call test%run(test_getRankFractional_D1_IK2, SK_"test_getRankFractional_D1_IK2")
1722#endif
1723#if IK1_ENABLED
1724 call test%run(test_getRankFractional_D1_IK1, SK_"test_getRankFractional_D1_IK1")
1725#endif
1726
1727 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1728
1729#if LK5_ENABLED
1730 call test%run(test_getRankFractional_D1_LK5, SK_"test_getRankFractional_D1_LK5")
1731#endif
1732#if LK4_ENABLED
1733 call test%run(test_getRankFractional_D1_LK4, SK_"test_getRankFractional_D1_LK4")
1734#endif
1735#if LK3_ENABLED
1736 call test%run(test_getRankFractional_D1_LK3, SK_"test_getRankFractional_D1_LK3")
1737#endif
1738#if LK2_ENABLED
1739 call test%run(test_getRankFractional_D1_LK2, SK_"test_getRankFractional_D1_LK2")
1740#endif
1741#if LK1_ENABLED
1742 call test%run(test_getRankFractional_D1_LK1, SK_"test_getRankFractional_D1_LK1")
1743#endif
1744
1745 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1746
1747#if CK5_ENABLED
1748 call test%run(test_getRankFractional_D1_CK5, SK_"test_getRankFractional_D1_CK5")
1749#endif
1750#if CK4_ENABLED
1751 call test%run(test_getRankFractional_D1_CK4, SK_"test_getRankFractional_D1_CK4")
1752#endif
1753#if CK3_ENABLED
1754 call test%run(test_getRankFractional_D1_CK3, SK_"test_getRankFractional_D1_CK3")
1755#endif
1756#if CK2_ENABLED
1757 call test%run(test_getRankFractional_D1_CK2, SK_"test_getRankFractional_D1_CK2")
1758#endif
1759#if CK1_ENABLED
1760 call test%run(test_getRankFractional_D1_CK1, SK_"test_getRankFractional_D1_CK1")
1761#endif
1762
1763 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1764
1765#if RK5_ENABLED
1766 call test%run(test_getRankFractional_D1_RK5, SK_"test_getRankFractional_D1_RK5")
1767#endif
1768#if RK4_ENABLED
1769 call test%run(test_getRankFractional_D1_RK4, SK_"test_getRankFractional_D1_RK4")
1770#endif
1771#if RK3_ENABLED
1772 call test%run(test_getRankFractional_D1_RK3, SK_"test_getRankFractional_D1_RK3")
1773#endif
1774#if RK2_ENABLED
1775 call test%run(test_getRankFractional_D1_RK2, SK_"test_getRankFractional_D1_RK2")
1776#endif
1777#if RK1_ENABLED
1778 call test%run(test_getRankFractional_D1_RK1, SK_"test_getRankFractional_D1_RK1")
1779#endif
1780
1781 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1782
1783#if PDT_ENABLED
1784#if SK5_ENABLED
1785 call test%run(test_getRankFractional_D1_PSSK5, SK_"test_getRankFractional_D1_PSSK5")
1786#endif
1787#if SK4_ENABLED
1788 call test%run(test_getRankFractional_D1_PSSK4, SK_"test_getRankFractional_D1_PSSK4")
1789#endif
1790#if SK3_ENABLED
1791 call test%run(test_getRankFractional_D1_PSSK3, SK_"test_getRankFractional_D1_PSSK3")
1792#endif
1793#if SK2_ENABLED
1794 call test%run(test_getRankFractional_D1_PSSK2, SK_"test_getRankFractional_D1_PSSK2")
1795#endif
1796#if SK1_ENABLED
1797 call test%run(test_getRankFractional_D1_PSSK1, SK_"test_getRankFractional_D1_PSSK1")
1798#endif
1799#endif
1800
1801 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1802
1803 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1804 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1805 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1806
1807 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1808
1809 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1810 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1811 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1812
1813 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1814
1815#if SK5_ENABLED
1816 call test%run(test_setRankFractional_D0_SK5, SK_"test_setRankFractional_D0_SK5")
1817#endif
1818#if SK4_ENABLED
1819 call test%run(test_setRankFractional_D0_SK4, SK_"test_setRankFractional_D0_SK4")
1820#endif
1821#if SK3_ENABLED
1822 call test%run(test_setRankFractional_D0_SK3, SK_"test_setRankFractional_D0_SK3")
1823#endif
1824#if SK2_ENABLED
1825 call test%run(test_setRankFractional_D0_SK2, SK_"test_setRankFractional_D0_SK2")
1826#endif
1827#if SK1_ENABLED
1828 call test%run(test_setRankFractional_D0_SK1, SK_"test_setRankFractional_D0_SK1")
1829#endif
1830
1831 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1832
1833#if SK5_ENABLED
1834 call test%run(test_setRankFractional_D1_SK5, SK_"test_setRankFractional_D1_SK5")
1835#endif
1836#if SK4_ENABLED
1837 call test%run(test_setRankFractional_D1_SK4, SK_"test_setRankFractional_D1_SK4")
1838#endif
1839#if SK3_ENABLED
1840 call test%run(test_setRankFractional_D1_SK3, SK_"test_setRankFractional_D1_SK3")
1841#endif
1842#if SK2_ENABLED
1843 call test%run(test_setRankFractional_D1_SK2, SK_"test_setRankFractional_D1_SK2")
1844#endif
1845#if SK1_ENABLED
1846 call test%run(test_setRankFractional_D1_SK1, SK_"test_setRankFractional_D1_SK1")
1847#endif
1848
1849 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1850
1851#if IK5_ENABLED
1852 call test%run(test_setRankFractional_D1_IK5, SK_"test_setRankFractional_D1_IK5")
1853#endif
1854#if IK4_ENABLED
1855 call test%run(test_setRankFractional_D1_IK4, SK_"test_setRankFractional_D1_IK4")
1856#endif
1857#if IK3_ENABLED
1858 call test%run(test_setRankFractional_D1_IK3, SK_"test_setRankFractional_D1_IK3")
1859#endif
1860#if IK2_ENABLED
1861 call test%run(test_setRankFractional_D1_IK2, SK_"test_setRankFractional_D1_IK2")
1862#endif
1863#if IK1_ENABLED
1864 call test%run(test_setRankFractional_D1_IK1, SK_"test_setRankFractional_D1_IK1")
1865#endif
1866
1867 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1868
1869#if LK5_ENABLED
1870 call test%run(test_setRankFractional_D1_LK5, SK_"test_setRankFractional_D1_LK5")
1871#endif
1872#if LK4_ENABLED
1873 call test%run(test_setRankFractional_D1_LK4, SK_"test_setRankFractional_D1_LK4")
1874#endif
1875#if LK3_ENABLED
1876 call test%run(test_setRankFractional_D1_LK3, SK_"test_setRankFractional_D1_LK3")
1877#endif
1878#if LK2_ENABLED
1879 call test%run(test_setRankFractional_D1_LK2, SK_"test_setRankFractional_D1_LK2")
1880#endif
1881#if LK1_ENABLED
1882 call test%run(test_setRankFractional_D1_LK1, SK_"test_setRankFractional_D1_LK1")
1883#endif
1884
1885 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1886
1887#if CK5_ENABLED
1888 call test%run(test_setRankFractional_D1_CK5, SK_"test_setRankFractional_D1_CK5")
1889#endif
1890#if CK4_ENABLED
1891 call test%run(test_setRankFractional_D1_CK4, SK_"test_setRankFractional_D1_CK4")
1892#endif
1893#if CK3_ENABLED
1894 call test%run(test_setRankFractional_D1_CK3, SK_"test_setRankFractional_D1_CK3")
1895#endif
1896#if CK2_ENABLED
1897 call test%run(test_setRankFractional_D1_CK2, SK_"test_setRankFractional_D1_CK2")
1898#endif
1899#if CK1_ENABLED
1900 call test%run(test_setRankFractional_D1_CK1, SK_"test_setRankFractional_D1_CK1")
1901#endif
1902
1903 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1904
1905#if RK5_ENABLED
1906 call test%run(test_setRankFractional_D1_RK5, SK_"test_setRankFractional_D1_RK5")
1907#endif
1908#if RK4_ENABLED
1909 call test%run(test_setRankFractional_D1_RK4, SK_"test_setRankFractional_D1_RK4")
1910#endif
1911#if RK3_ENABLED
1912 call test%run(test_setRankFractional_D1_RK3, SK_"test_setRankFractional_D1_RK3")
1913#endif
1914#if RK2_ENABLED
1915 call test%run(test_setRankFractional_D1_RK2, SK_"test_setRankFractional_D1_RK2")
1916#endif
1917#if RK1_ENABLED
1918 call test%run(test_setRankFractional_D1_RK1, SK_"test_setRankFractional_D1_RK1")
1919#endif
1920
1921 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1922
1923#if PDT_ENABLED
1924#if SK5_ENABLED
1925 call test%run(test_setRankFractional_D1_PSSK5, SK_"test_setRankFractional_D1_PSSK5")
1926#endif
1927#if SK4_ENABLED
1928 call test%run(test_setRankFractional_D1_PSSK4, SK_"test_setRankFractional_D1_PSSK4")
1929#endif
1930#if SK3_ENABLED
1931 call test%run(test_setRankFractional_D1_PSSK3, SK_"test_setRankFractional_D1_PSSK3")
1932#endif
1933#if SK2_ENABLED
1934 call test%run(test_setRankFractional_D1_PSSK2, SK_"test_setRankFractional_D1_PSSK2")
1935#endif
1936#if SK1_ENABLED
1937 call test%run(test_setRankFractional_D1_PSSK1, SK_"test_setRankFractional_D1_PSSK1")
1938#endif
1939#endif
1940
1941 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1942
1943 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1944 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1945 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1946
1947 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1948
1949 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1950 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1951 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1952
1953 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1954
1955#if SK5_ENABLED
1956 call test%run(test_getRankModified_D0_SK5, SK_"test_getRankModified_D0_SK5")
1957#endif
1958#if SK4_ENABLED
1959 call test%run(test_getRankModified_D0_SK4, SK_"test_getRankModified_D0_SK4")
1960#endif
1961#if SK3_ENABLED
1962 call test%run(test_getRankModified_D0_SK3, SK_"test_getRankModified_D0_SK3")
1963#endif
1964#if SK2_ENABLED
1965 call test%run(test_getRankModified_D0_SK2, SK_"test_getRankModified_D0_SK2")
1966#endif
1967#if SK1_ENABLED
1968 call test%run(test_getRankModified_D0_SK1, SK_"test_getRankModified_D0_SK1")
1969#endif
1970
1971 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1972
1973#if SK5_ENABLED
1974 call test%run(test_getRankModified_D1_SK5, SK_"test_getRankModified_D1_SK5")
1975#endif
1976#if SK4_ENABLED
1977 call test%run(test_getRankModified_D1_SK4, SK_"test_getRankModified_D1_SK4")
1978#endif
1979#if SK3_ENABLED
1980 call test%run(test_getRankModified_D1_SK3, SK_"test_getRankModified_D1_SK3")
1981#endif
1982#if SK2_ENABLED
1983 call test%run(test_getRankModified_D1_SK2, SK_"test_getRankModified_D1_SK2")
1984#endif
1985#if SK1_ENABLED
1986 call test%run(test_getRankModified_D1_SK1, SK_"test_getRankModified_D1_SK1")
1987#endif
1988
1989 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1990
1991#if IK5_ENABLED
1992 call test%run(test_getRankModified_D1_IK5, SK_"test_getRankModified_D1_IK5")
1993#endif
1994#if IK4_ENABLED
1995 call test%run(test_getRankModified_D1_IK4, SK_"test_getRankModified_D1_IK4")
1996#endif
1997#if IK3_ENABLED
1998 call test%run(test_getRankModified_D1_IK3, SK_"test_getRankModified_D1_IK3")
1999#endif
2000#if IK2_ENABLED
2001 call test%run(test_getRankModified_D1_IK2, SK_"test_getRankModified_D1_IK2")
2002#endif
2003#if IK1_ENABLED
2004 call test%run(test_getRankModified_D1_IK1, SK_"test_getRankModified_D1_IK1")
2005#endif
2006
2007 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2008
2009#if LK5_ENABLED
2010 call test%run(test_getRankModified_D1_LK5, SK_"test_getRankModified_D1_LK5")
2011#endif
2012#if LK4_ENABLED
2013 call test%run(test_getRankModified_D1_LK4, SK_"test_getRankModified_D1_LK4")
2014#endif
2015#if LK3_ENABLED
2016 call test%run(test_getRankModified_D1_LK3, SK_"test_getRankModified_D1_LK3")
2017#endif
2018#if LK2_ENABLED
2019 call test%run(test_getRankModified_D1_LK2, SK_"test_getRankModified_D1_LK2")
2020#endif
2021#if LK1_ENABLED
2022 call test%run(test_getRankModified_D1_LK1, SK_"test_getRankModified_D1_LK1")
2023#endif
2024
2025 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2026
2027#if CK5_ENABLED
2028 call test%run(test_getRankModified_D1_CK5, SK_"test_getRankModified_D1_CK5")
2029#endif
2030#if CK4_ENABLED
2031 call test%run(test_getRankModified_D1_CK4, SK_"test_getRankModified_D1_CK4")
2032#endif
2033#if CK3_ENABLED
2034 call test%run(test_getRankModified_D1_CK3, SK_"test_getRankModified_D1_CK3")
2035#endif
2036#if CK2_ENABLED
2037 call test%run(test_getRankModified_D1_CK2, SK_"test_getRankModified_D1_CK2")
2038#endif
2039#if CK1_ENABLED
2040 call test%run(test_getRankModified_D1_CK1, SK_"test_getRankModified_D1_CK1")
2041#endif
2042
2043 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2044
2045#if RK5_ENABLED
2046 call test%run(test_getRankModified_D1_RK5, SK_"test_getRankModified_D1_RK5")
2047#endif
2048#if RK4_ENABLED
2049 call test%run(test_getRankModified_D1_RK4, SK_"test_getRankModified_D1_RK4")
2050#endif
2051#if RK3_ENABLED
2052 call test%run(test_getRankModified_D1_RK3, SK_"test_getRankModified_D1_RK3")
2053#endif
2054#if RK2_ENABLED
2055 call test%run(test_getRankModified_D1_RK2, SK_"test_getRankModified_D1_RK2")
2056#endif
2057#if RK1_ENABLED
2058 call test%run(test_getRankModified_D1_RK1, SK_"test_getRankModified_D1_RK1")
2059#endif
2060
2061 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2062
2063#if PDT_ENABLED
2064#if SK5_ENABLED
2065 call test%run(test_getRankModified_D1_PSSK5, SK_"test_getRankModified_D1_PSSK5")
2066#endif
2067#if SK4_ENABLED
2068 call test%run(test_getRankModified_D1_PSSK4, SK_"test_getRankModified_D1_PSSK4")
2069#endif
2070#if SK3_ENABLED
2071 call test%run(test_getRankModified_D1_PSSK3, SK_"test_getRankModified_D1_PSSK3")
2072#endif
2073#if SK2_ENABLED
2074 call test%run(test_getRankModified_D1_PSSK2, SK_"test_getRankModified_D1_PSSK2")
2075#endif
2076#if SK1_ENABLED
2077 call test%run(test_getRankModified_D1_PSSK1, SK_"test_getRankModified_D1_PSSK1")
2078#endif
2079#endif
2080
2081 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2082
2083 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2084 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2085 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2086
2087 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2088
2089 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2090 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2091 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2092
2093 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2094
2095#if SK5_ENABLED
2096 call test%run(test_setRankModified_D0_SK5, SK_"test_setRankModified_D0_SK5")
2097#endif
2098#if SK4_ENABLED
2099 call test%run(test_setRankModified_D0_SK4, SK_"test_setRankModified_D0_SK4")
2100#endif
2101#if SK3_ENABLED
2102 call test%run(test_setRankModified_D0_SK3, SK_"test_setRankModified_D0_SK3")
2103#endif
2104#if SK2_ENABLED
2105 call test%run(test_setRankModified_D0_SK2, SK_"test_setRankModified_D0_SK2")
2106#endif
2107#if SK1_ENABLED
2108 call test%run(test_setRankModified_D0_SK1, SK_"test_setRankModified_D0_SK1")
2109#endif
2110
2111 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2112
2113#if SK5_ENABLED
2114 call test%run(test_setRankModified_D1_SK5, SK_"test_setRankModified_D1_SK5")
2115#endif
2116#if SK4_ENABLED
2117 call test%run(test_setRankModified_D1_SK4, SK_"test_setRankModified_D1_SK4")
2118#endif
2119#if SK3_ENABLED
2120 call test%run(test_setRankModified_D1_SK3, SK_"test_setRankModified_D1_SK3")
2121#endif
2122#if SK2_ENABLED
2123 call test%run(test_setRankModified_D1_SK2, SK_"test_setRankModified_D1_SK2")
2124#endif
2125#if SK1_ENABLED
2126 call test%run(test_setRankModified_D1_SK1, SK_"test_setRankModified_D1_SK1")
2127#endif
2128
2129 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2130
2131#if IK5_ENABLED
2132 call test%run(test_setRankModified_D1_IK5, SK_"test_setRankModified_D1_IK5")
2133#endif
2134#if IK4_ENABLED
2135 call test%run(test_setRankModified_D1_IK4, SK_"test_setRankModified_D1_IK4")
2136#endif
2137#if IK3_ENABLED
2138 call test%run(test_setRankModified_D1_IK3, SK_"test_setRankModified_D1_IK3")
2139#endif
2140#if IK2_ENABLED
2141 call test%run(test_setRankModified_D1_IK2, SK_"test_setRankModified_D1_IK2")
2142#endif
2143#if IK1_ENABLED
2144 call test%run(test_setRankModified_D1_IK1, SK_"test_setRankModified_D1_IK1")
2145#endif
2146
2147 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2148
2149#if LK5_ENABLED
2150 call test%run(test_setRankModified_D1_LK5, SK_"test_setRankModified_D1_LK5")
2151#endif
2152#if LK4_ENABLED
2153 call test%run(test_setRankModified_D1_LK4, SK_"test_setRankModified_D1_LK4")
2154#endif
2155#if LK3_ENABLED
2156 call test%run(test_setRankModified_D1_LK3, SK_"test_setRankModified_D1_LK3")
2157#endif
2158#if LK2_ENABLED
2159 call test%run(test_setRankModified_D1_LK2, SK_"test_setRankModified_D1_LK2")
2160#endif
2161#if LK1_ENABLED
2162 call test%run(test_setRankModified_D1_LK1, SK_"test_setRankModified_D1_LK1")
2163#endif
2164
2165 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2166
2167#if CK5_ENABLED
2168 call test%run(test_setRankModified_D1_CK5, SK_"test_setRankModified_D1_CK5")
2169#endif
2170#if CK4_ENABLED
2171 call test%run(test_setRankModified_D1_CK4, SK_"test_setRankModified_D1_CK4")
2172#endif
2173#if CK3_ENABLED
2174 call test%run(test_setRankModified_D1_CK3, SK_"test_setRankModified_D1_CK3")
2175#endif
2176#if CK2_ENABLED
2177 call test%run(test_setRankModified_D1_CK2, SK_"test_setRankModified_D1_CK2")
2178#endif
2179#if CK1_ENABLED
2180 call test%run(test_setRankModified_D1_CK1, SK_"test_setRankModified_D1_CK1")
2181#endif
2182
2183 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2184
2185#if RK5_ENABLED
2186 call test%run(test_setRankModified_D1_RK5, SK_"test_setRankModified_D1_RK5")
2187#endif
2188#if RK4_ENABLED
2189 call test%run(test_setRankModified_D1_RK4, SK_"test_setRankModified_D1_RK4")
2190#endif
2191#if RK3_ENABLED
2192 call test%run(test_setRankModified_D1_RK3, SK_"test_setRankModified_D1_RK3")
2193#endif
2194#if RK2_ENABLED
2195 call test%run(test_setRankModified_D1_RK2, SK_"test_setRankModified_D1_RK2")
2196#endif
2197#if RK1_ENABLED
2198 call test%run(test_setRankModified_D1_RK1, SK_"test_setRankModified_D1_RK1")
2199#endif
2200
2201 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2202
2203#if PDT_ENABLED
2204#if SK5_ENABLED
2205 call test%run(test_setRankModified_D1_PSSK5, SK_"test_setRankModified_D1_PSSK5")
2206#endif
2207#if SK4_ENABLED
2208 call test%run(test_setRankModified_D1_PSSK4, SK_"test_setRankModified_D1_PSSK4")
2209#endif
2210#if SK3_ENABLED
2211 call test%run(test_setRankModified_D1_PSSK3, SK_"test_setRankModified_D1_PSSK3")
2212#endif
2213#if SK2_ENABLED
2214 call test%run(test_setRankModified_D1_PSSK2, SK_"test_setRankModified_D1_PSSK2")
2215#endif
2216#if SK1_ENABLED
2217 call test%run(test_setRankModified_D1_PSSK1, SK_"test_setRankModified_D1_PSSK1")
2218#endif
2219#endif
2220
2221 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2222
2223 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2224 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2225 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2226
2227 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2228
2229 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2230 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2231 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2232
2233 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2234
2235#if SK5_ENABLED
2236 call test%run(test_getRankOrdinal_D0_SK5, SK_"test_getRankOrdinal_D0_SK5")
2237#endif
2238#if SK4_ENABLED
2239 call test%run(test_getRankOrdinal_D0_SK4, SK_"test_getRankOrdinal_D0_SK4")
2240#endif
2241#if SK3_ENABLED
2242 call test%run(test_getRankOrdinal_D0_SK3, SK_"test_getRankOrdinal_D0_SK3")
2243#endif
2244#if SK2_ENABLED
2245 call test%run(test_getRankOrdinal_D0_SK2, SK_"test_getRankOrdinal_D0_SK2")
2246#endif
2247#if SK1_ENABLED
2248 call test%run(test_getRankOrdinal_D0_SK1, SK_"test_getRankOrdinal_D0_SK1")
2249#endif
2250
2251 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2252
2253#if SK5_ENABLED
2254 call test%run(test_getRankOrdinal_D1_SK5, SK_"test_getRankOrdinal_D1_SK5")
2255#endif
2256#if SK4_ENABLED
2257 call test%run(test_getRankOrdinal_D1_SK4, SK_"test_getRankOrdinal_D1_SK4")
2258#endif
2259#if SK3_ENABLED
2260 call test%run(test_getRankOrdinal_D1_SK3, SK_"test_getRankOrdinal_D1_SK3")
2261#endif
2262#if SK2_ENABLED
2263 call test%run(test_getRankOrdinal_D1_SK2, SK_"test_getRankOrdinal_D1_SK2")
2264#endif
2265#if SK1_ENABLED
2266 call test%run(test_getRankOrdinal_D1_SK1, SK_"test_getRankOrdinal_D1_SK1")
2267#endif
2268
2269 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2270
2271#if IK5_ENABLED
2272 call test%run(test_getRankOrdinal_D1_IK5, SK_"test_getRankOrdinal_D1_IK5")
2273#endif
2274#if IK4_ENABLED
2275 call test%run(test_getRankOrdinal_D1_IK4, SK_"test_getRankOrdinal_D1_IK4")
2276#endif
2277#if IK3_ENABLED
2278 call test%run(test_getRankOrdinal_D1_IK3, SK_"test_getRankOrdinal_D1_IK3")
2279#endif
2280#if IK2_ENABLED
2281 call test%run(test_getRankOrdinal_D1_IK2, SK_"test_getRankOrdinal_D1_IK2")
2282#endif
2283#if IK1_ENABLED
2284 call test%run(test_getRankOrdinal_D1_IK1, SK_"test_getRankOrdinal_D1_IK1")
2285#endif
2286
2287 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2288
2289#if LK5_ENABLED
2290 call test%run(test_getRankOrdinal_D1_LK5, SK_"test_getRankOrdinal_D1_LK5")
2291#endif
2292#if LK4_ENABLED
2293 call test%run(test_getRankOrdinal_D1_LK4, SK_"test_getRankOrdinal_D1_LK4")
2294#endif
2295#if LK3_ENABLED
2296 call test%run(test_getRankOrdinal_D1_LK3, SK_"test_getRankOrdinal_D1_LK3")
2297#endif
2298#if LK2_ENABLED
2299 call test%run(test_getRankOrdinal_D1_LK2, SK_"test_getRankOrdinal_D1_LK2")
2300#endif
2301#if LK1_ENABLED
2302 call test%run(test_getRankOrdinal_D1_LK1, SK_"test_getRankOrdinal_D1_LK1")
2303#endif
2304
2305 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2306
2307#if CK5_ENABLED
2308 call test%run(test_getRankOrdinal_D1_CK5, SK_"test_getRankOrdinal_D1_CK5")
2309#endif
2310#if CK4_ENABLED
2311 call test%run(test_getRankOrdinal_D1_CK4, SK_"test_getRankOrdinal_D1_CK4")
2312#endif
2313#if CK3_ENABLED
2314 call test%run(test_getRankOrdinal_D1_CK3, SK_"test_getRankOrdinal_D1_CK3")
2315#endif
2316#if CK2_ENABLED
2317 call test%run(test_getRankOrdinal_D1_CK2, SK_"test_getRankOrdinal_D1_CK2")
2318#endif
2319#if CK1_ENABLED
2320 call test%run(test_getRankOrdinal_D1_CK1, SK_"test_getRankOrdinal_D1_CK1")
2321#endif
2322
2323 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2324
2325#if RK5_ENABLED
2326 call test%run(test_getRankOrdinal_D1_RK5, SK_"test_getRankOrdinal_D1_RK5")
2327#endif
2328#if RK4_ENABLED
2329 call test%run(test_getRankOrdinal_D1_RK4, SK_"test_getRankOrdinal_D1_RK4")
2330#endif
2331#if RK3_ENABLED
2332 call test%run(test_getRankOrdinal_D1_RK3, SK_"test_getRankOrdinal_D1_RK3")
2333#endif
2334#if RK2_ENABLED
2335 call test%run(test_getRankOrdinal_D1_RK2, SK_"test_getRankOrdinal_D1_RK2")
2336#endif
2337#if RK1_ENABLED
2338 call test%run(test_getRankOrdinal_D1_RK1, SK_"test_getRankOrdinal_D1_RK1")
2339#endif
2340
2341 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2342
2343#if PDT_ENABLED
2344#if SK5_ENABLED
2345 call test%run(test_getRankOrdinal_D1_PSSK5, SK_"test_getRankOrdinal_D1_PSSK5")
2346#endif
2347#if SK4_ENABLED
2348 call test%run(test_getRankOrdinal_D1_PSSK4, SK_"test_getRankOrdinal_D1_PSSK4")
2349#endif
2350#if SK3_ENABLED
2351 call test%run(test_getRankOrdinal_D1_PSSK3, SK_"test_getRankOrdinal_D1_PSSK3")
2352#endif
2353#if SK2_ENABLED
2354 call test%run(test_getRankOrdinal_D1_PSSK2, SK_"test_getRankOrdinal_D1_PSSK2")
2355#endif
2356#if SK1_ENABLED
2357 call test%run(test_getRankOrdinal_D1_PSSK1, SK_"test_getRankOrdinal_D1_PSSK1")
2358#endif
2359#endif
2360
2361 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2362
2363 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2364 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2365 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2366
2367 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2368
2369 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2370 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2371 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2372
2373 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2374
2375#if SK5_ENABLED
2376 call test%run(test_setRankOrdinal_D0_SK5, SK_"test_setRankOrdinal_D0_SK5")
2377#endif
2378#if SK4_ENABLED
2379 call test%run(test_setRankOrdinal_D0_SK4, SK_"test_setRankOrdinal_D0_SK4")
2380#endif
2381#if SK3_ENABLED
2382 call test%run(test_setRankOrdinal_D0_SK3, SK_"test_setRankOrdinal_D0_SK3")
2383#endif
2384#if SK2_ENABLED
2385 call test%run(test_setRankOrdinal_D0_SK2, SK_"test_setRankOrdinal_D0_SK2")
2386#endif
2387#if SK1_ENABLED
2388 call test%run(test_setRankOrdinal_D0_SK1, SK_"test_setRankOrdinal_D0_SK1")
2389#endif
2390
2391 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2392
2393#if SK5_ENABLED
2394 call test%run(test_setRankOrdinal_D1_SK5, SK_"test_setRankOrdinal_D1_SK5")
2395#endif
2396#if SK4_ENABLED
2397 call test%run(test_setRankOrdinal_D1_SK4, SK_"test_setRankOrdinal_D1_SK4")
2398#endif
2399#if SK3_ENABLED
2400 call test%run(test_setRankOrdinal_D1_SK3, SK_"test_setRankOrdinal_D1_SK3")
2401#endif
2402#if SK2_ENABLED
2403 call test%run(test_setRankOrdinal_D1_SK2, SK_"test_setRankOrdinal_D1_SK2")
2404#endif
2405#if SK1_ENABLED
2406 call test%run(test_setRankOrdinal_D1_SK1, SK_"test_setRankOrdinal_D1_SK1")
2407#endif
2408
2409 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2410
2411#if IK5_ENABLED
2412 call test%run(test_setRankOrdinal_D1_IK5, SK_"test_setRankOrdinal_D1_IK5")
2413#endif
2414#if IK4_ENABLED
2415 call test%run(test_setRankOrdinal_D1_IK4, SK_"test_setRankOrdinal_D1_IK4")
2416#endif
2417#if IK3_ENABLED
2418 call test%run(test_setRankOrdinal_D1_IK3, SK_"test_setRankOrdinal_D1_IK3")
2419#endif
2420#if IK2_ENABLED
2421 call test%run(test_setRankOrdinal_D1_IK2, SK_"test_setRankOrdinal_D1_IK2")
2422#endif
2423#if IK1_ENABLED
2424 call test%run(test_setRankOrdinal_D1_IK1, SK_"test_setRankOrdinal_D1_IK1")
2425#endif
2426
2427 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2428
2429#if LK5_ENABLED
2430 call test%run(test_setRankOrdinal_D1_LK5, SK_"test_setRankOrdinal_D1_LK5")
2431#endif
2432#if LK4_ENABLED
2433 call test%run(test_setRankOrdinal_D1_LK4, SK_"test_setRankOrdinal_D1_LK4")
2434#endif
2435#if LK3_ENABLED
2436 call test%run(test_setRankOrdinal_D1_LK3, SK_"test_setRankOrdinal_D1_LK3")
2437#endif
2438#if LK2_ENABLED
2439 call test%run(test_setRankOrdinal_D1_LK2, SK_"test_setRankOrdinal_D1_LK2")
2440#endif
2441#if LK1_ENABLED
2442 call test%run(test_setRankOrdinal_D1_LK1, SK_"test_setRankOrdinal_D1_LK1")
2443#endif
2444
2445 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2446
2447#if CK5_ENABLED
2448 call test%run(test_setRankOrdinal_D1_CK5, SK_"test_setRankOrdinal_D1_CK5")
2449#endif
2450#if CK4_ENABLED
2451 call test%run(test_setRankOrdinal_D1_CK4, SK_"test_setRankOrdinal_D1_CK4")
2452#endif
2453#if CK3_ENABLED
2454 call test%run(test_setRankOrdinal_D1_CK3, SK_"test_setRankOrdinal_D1_CK3")
2455#endif
2456#if CK2_ENABLED
2457 call test%run(test_setRankOrdinal_D1_CK2, SK_"test_setRankOrdinal_D1_CK2")
2458#endif
2459#if CK1_ENABLED
2460 call test%run(test_setRankOrdinal_D1_CK1, SK_"test_setRankOrdinal_D1_CK1")
2461#endif
2462
2463 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2464
2465#if RK5_ENABLED
2466 call test%run(test_setRankOrdinal_D1_RK5, SK_"test_setRankOrdinal_D1_RK5")
2467#endif
2468#if RK4_ENABLED
2469 call test%run(test_setRankOrdinal_D1_RK4, SK_"test_setRankOrdinal_D1_RK4")
2470#endif
2471#if RK3_ENABLED
2472 call test%run(test_setRankOrdinal_D1_RK3, SK_"test_setRankOrdinal_D1_RK3")
2473#endif
2474#if RK2_ENABLED
2475 call test%run(test_setRankOrdinal_D1_RK2, SK_"test_setRankOrdinal_D1_RK2")
2476#endif
2477#if RK1_ENABLED
2478 call test%run(test_setRankOrdinal_D1_RK1, SK_"test_setRankOrdinal_D1_RK1")
2479#endif
2480
2481 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2482
2483#if PDT_ENABLED
2484#if SK5_ENABLED
2485 call test%run(test_setRankOrdinal_D1_PSSK5, SK_"test_setRankOrdinal_D1_PSSK5")
2486#endif
2487#if SK4_ENABLED
2488 call test%run(test_setRankOrdinal_D1_PSSK4, SK_"test_setRankOrdinal_D1_PSSK4")
2489#endif
2490#if SK3_ENABLED
2491 call test%run(test_setRankOrdinal_D1_PSSK3, SK_"test_setRankOrdinal_D1_PSSK3")
2492#endif
2493#if SK2_ENABLED
2494 call test%run(test_setRankOrdinal_D1_PSSK2, SK_"test_setRankOrdinal_D1_PSSK2")
2495#endif
2496#if SK1_ENABLED
2497 call test%run(test_setRankOrdinal_D1_PSSK1, SK_"test_setRankOrdinal_D1_PSSK1")
2498#endif
2499#endif
2500
2501 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2502
2503 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2504 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2505 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2506
2507 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2508
2509 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2510 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2511 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2512
2513 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2514
2515#if SK5_ENABLED
2516 call test%run(test_getRankStandard_D0_SK5, SK_"test_getRankStandard_D0_SK5")
2517#endif
2518#if SK4_ENABLED
2519 call test%run(test_getRankStandard_D0_SK4, SK_"test_getRankStandard_D0_SK4")
2520#endif
2521#if SK3_ENABLED
2522 call test%run(test_getRankStandard_D0_SK3, SK_"test_getRankStandard_D0_SK3")
2523#endif
2524#if SK2_ENABLED
2525 call test%run(test_getRankStandard_D0_SK2, SK_"test_getRankStandard_D0_SK2")
2526#endif
2527#if SK1_ENABLED
2528 call test%run(test_getRankStandard_D0_SK1, SK_"test_getRankStandard_D0_SK1")
2529#endif
2530
2531 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2532
2533#if SK5_ENABLED
2534 call test%run(test_getRankStandard_D1_SK5, SK_"test_getRankStandard_D1_SK5")
2535#endif
2536#if SK4_ENABLED
2537 call test%run(test_getRankStandard_D1_SK4, SK_"test_getRankStandard_D1_SK4")
2538#endif
2539#if SK3_ENABLED
2540 call test%run(test_getRankStandard_D1_SK3, SK_"test_getRankStandard_D1_SK3")
2541#endif
2542#if SK2_ENABLED
2543 call test%run(test_getRankStandard_D1_SK2, SK_"test_getRankStandard_D1_SK2")
2544#endif
2545#if SK1_ENABLED
2546 call test%run(test_getRankStandard_D1_SK1, SK_"test_getRankStandard_D1_SK1")
2547#endif
2548
2549 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2550
2551#if IK5_ENABLED
2552 call test%run(test_getRankStandard_D1_IK5, SK_"test_getRankStandard_D1_IK5")
2553#endif
2554#if IK4_ENABLED
2555 call test%run(test_getRankStandard_D1_IK4, SK_"test_getRankStandard_D1_IK4")
2556#endif
2557#if IK3_ENABLED
2558 call test%run(test_getRankStandard_D1_IK3, SK_"test_getRankStandard_D1_IK3")
2559#endif
2560#if IK2_ENABLED
2561 call test%run(test_getRankStandard_D1_IK2, SK_"test_getRankStandard_D1_IK2")
2562#endif
2563#if IK1_ENABLED
2564 call test%run(test_getRankStandard_D1_IK1, SK_"test_getRankStandard_D1_IK1")
2565#endif
2566
2567 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2568
2569#if LK5_ENABLED
2570 call test%run(test_getRankStandard_D1_LK5, SK_"test_getRankStandard_D1_LK5")
2571#endif
2572#if LK4_ENABLED
2573 call test%run(test_getRankStandard_D1_LK4, SK_"test_getRankStandard_D1_LK4")
2574#endif
2575#if LK3_ENABLED
2576 call test%run(test_getRankStandard_D1_LK3, SK_"test_getRankStandard_D1_LK3")
2577#endif
2578#if LK2_ENABLED
2579 call test%run(test_getRankStandard_D1_LK2, SK_"test_getRankStandard_D1_LK2")
2580#endif
2581#if LK1_ENABLED
2582 call test%run(test_getRankStandard_D1_LK1, SK_"test_getRankStandard_D1_LK1")
2583#endif
2584
2585 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2586
2587#if CK5_ENABLED
2588 call test%run(test_getRankStandard_D1_CK5, SK_"test_getRankStandard_D1_CK5")
2589#endif
2590#if CK4_ENABLED
2591 call test%run(test_getRankStandard_D1_CK4, SK_"test_getRankStandard_D1_CK4")
2592#endif
2593#if CK3_ENABLED
2594 call test%run(test_getRankStandard_D1_CK3, SK_"test_getRankStandard_D1_CK3")
2595#endif
2596#if CK2_ENABLED
2597 call test%run(test_getRankStandard_D1_CK2, SK_"test_getRankStandard_D1_CK2")
2598#endif
2599#if CK1_ENABLED
2600 call test%run(test_getRankStandard_D1_CK1, SK_"test_getRankStandard_D1_CK1")
2601#endif
2602
2603 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2604
2605#if RK5_ENABLED
2606 call test%run(test_getRankStandard_D1_RK5, SK_"test_getRankStandard_D1_RK5")
2607#endif
2608#if RK4_ENABLED
2609 call test%run(test_getRankStandard_D1_RK4, SK_"test_getRankStandard_D1_RK4")
2610#endif
2611#if RK3_ENABLED
2612 call test%run(test_getRankStandard_D1_RK3, SK_"test_getRankStandard_D1_RK3")
2613#endif
2614#if RK2_ENABLED
2615 call test%run(test_getRankStandard_D1_RK2, SK_"test_getRankStandard_D1_RK2")
2616#endif
2617#if RK1_ENABLED
2618 call test%run(test_getRankStandard_D1_RK1, SK_"test_getRankStandard_D1_RK1")
2619#endif
2620
2621 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2622
2623#if PDT_ENABLED
2624#if SK5_ENABLED
2625 call test%run(test_getRankStandard_D1_PSSK5, SK_"test_getRankStandard_D1_PSSK5")
2626#endif
2627#if SK4_ENABLED
2628 call test%run(test_getRankStandard_D1_PSSK4, SK_"test_getRankStandard_D1_PSSK4")
2629#endif
2630#if SK3_ENABLED
2631 call test%run(test_getRankStandard_D1_PSSK3, SK_"test_getRankStandard_D1_PSSK3")
2632#endif
2633#if SK2_ENABLED
2634 call test%run(test_getRankStandard_D1_PSSK2, SK_"test_getRankStandard_D1_PSSK2")
2635#endif
2636#if SK1_ENABLED
2637 call test%run(test_getRankStandard_D1_PSSK1, SK_"test_getRankStandard_D1_PSSK1")
2638#endif
2639#endif
2640
2641 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2642
2643 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2644 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2645 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2646
2647 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2648
2649 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2650 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2651 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2652
2653 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2654
2655#if SK5_ENABLED
2656 call test%run(test_setRankStandard_D0_SK5, SK_"test_setRankStandard_D0_SK5")
2657#endif
2658#if SK4_ENABLED
2659 call test%run(test_setRankStandard_D0_SK4, SK_"test_setRankStandard_D0_SK4")
2660#endif
2661#if SK3_ENABLED
2662 call test%run(test_setRankStandard_D0_SK3, SK_"test_setRankStandard_D0_SK3")
2663#endif
2664#if SK2_ENABLED
2665 call test%run(test_setRankStandard_D0_SK2, SK_"test_setRankStandard_D0_SK2")
2666#endif
2667#if SK1_ENABLED
2668 call test%run(test_setRankStandard_D0_SK1, SK_"test_setRankStandard_D0_SK1")
2669#endif
2670
2671 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2672
2673#if SK5_ENABLED
2674 call test%run(test_setRankStandard_D1_SK5, SK_"test_setRankStandard_D1_SK5")
2675#endif
2676#if SK4_ENABLED
2677 call test%run(test_setRankStandard_D1_SK4, SK_"test_setRankStandard_D1_SK4")
2678#endif
2679#if SK3_ENABLED
2680 call test%run(test_setRankStandard_D1_SK3, SK_"test_setRankStandard_D1_SK3")
2681#endif
2682#if SK2_ENABLED
2683 call test%run(test_setRankStandard_D1_SK2, SK_"test_setRankStandard_D1_SK2")
2684#endif
2685#if SK1_ENABLED
2686 call test%run(test_setRankStandard_D1_SK1, SK_"test_setRankStandard_D1_SK1")
2687#endif
2688
2689 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2690
2691#if IK5_ENABLED
2692 call test%run(test_setRankStandard_D1_IK5, SK_"test_setRankStandard_D1_IK5")
2693#endif
2694#if IK4_ENABLED
2695 call test%run(test_setRankStandard_D1_IK4, SK_"test_setRankStandard_D1_IK4")
2696#endif
2697#if IK3_ENABLED
2698 call test%run(test_setRankStandard_D1_IK3, SK_"test_setRankStandard_D1_IK3")
2699#endif
2700#if IK2_ENABLED
2701 call test%run(test_setRankStandard_D1_IK2, SK_"test_setRankStandard_D1_IK2")
2702#endif
2703#if IK1_ENABLED
2704 call test%run(test_setRankStandard_D1_IK1, SK_"test_setRankStandard_D1_IK1")
2705#endif
2706
2707 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2708
2709#if LK5_ENABLED
2710 call test%run(test_setRankStandard_D1_LK5, SK_"test_setRankStandard_D1_LK5")
2711#endif
2712#if LK4_ENABLED
2713 call test%run(test_setRankStandard_D1_LK4, SK_"test_setRankStandard_D1_LK4")
2714#endif
2715#if LK3_ENABLED
2716 call test%run(test_setRankStandard_D1_LK3, SK_"test_setRankStandard_D1_LK3")
2717#endif
2718#if LK2_ENABLED
2719 call test%run(test_setRankStandard_D1_LK2, SK_"test_setRankStandard_D1_LK2")
2720#endif
2721#if LK1_ENABLED
2722 call test%run(test_setRankStandard_D1_LK1, SK_"test_setRankStandard_D1_LK1")
2723#endif
2724
2725 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2726
2727#if CK5_ENABLED
2728 call test%run(test_setRankStandard_D1_CK5, SK_"test_setRankStandard_D1_CK5")
2729#endif
2730#if CK4_ENABLED
2731 call test%run(test_setRankStandard_D1_CK4, SK_"test_setRankStandard_D1_CK4")
2732#endif
2733#if CK3_ENABLED
2734 call test%run(test_setRankStandard_D1_CK3, SK_"test_setRankStandard_D1_CK3")
2735#endif
2736#if CK2_ENABLED
2737 call test%run(test_setRankStandard_D1_CK2, SK_"test_setRankStandard_D1_CK2")
2738#endif
2739#if CK1_ENABLED
2740 call test%run(test_setRankStandard_D1_CK1, SK_"test_setRankStandard_D1_CK1")
2741#endif
2742
2743 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2744
2745#if RK5_ENABLED
2746 call test%run(test_setRankStandard_D1_RK5, SK_"test_setRankStandard_D1_RK5")
2747#endif
2748#if RK4_ENABLED
2749 call test%run(test_setRankStandard_D1_RK4, SK_"test_setRankStandard_D1_RK4")
2750#endif
2751#if RK3_ENABLED
2752 call test%run(test_setRankStandard_D1_RK3, SK_"test_setRankStandard_D1_RK3")
2753#endif
2754#if RK2_ENABLED
2755 call test%run(test_setRankStandard_D1_RK2, SK_"test_setRankStandard_D1_RK2")
2756#endif
2757#if RK1_ENABLED
2758 call test%run(test_setRankStandard_D1_RK1, SK_"test_setRankStandard_D1_RK1")
2759#endif
2760
2761 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2762
2763#if PDT_ENABLED
2764#if SK5_ENABLED
2765 call test%run(test_setRankStandard_D1_PSSK5, SK_"test_setRankStandard_D1_PSSK5")
2766#endif
2767#if SK4_ENABLED
2768 call test%run(test_setRankStandard_D1_PSSK4, SK_"test_setRankStandard_D1_PSSK4")
2769#endif
2770#if SK3_ENABLED
2771 call test%run(test_setRankStandard_D1_PSSK3, SK_"test_setRankStandard_D1_PSSK3")
2772#endif
2773#if SK2_ENABLED
2774 call test%run(test_setRankStandard_D1_PSSK2, SK_"test_setRankStandard_D1_PSSK2")
2775#endif
2776#if SK1_ENABLED
2777 call test%run(test_setRankStandard_D1_PSSK1, SK_"test_setRankStandard_D1_PSSK1")
2778#endif
2779#endif
2780
2781 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2782
2783 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2784 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2785 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2786
2787 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2788 call test%summarize()
2789
2790 end subroutine setTest
2791
2792!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2793
2794end module test_pm_arrayRank
pm_arrayRank
This module contains procedures and generic interfaces for obtaining various rankings of elements of ...
Definition: pm_arrayRank.F90:134
pm_arrayRank::MODULE_NAME
character(*, SK), parameter MODULE_NAME
Definition: pm_arrayRank.F90:140
pm_kind
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
Definition: pm_kind.F90:268
pm_kind::RK
integer, parameter RK
The default real kind in the ParaMonte library: real64 in Fortran, c_double in C-Fortran Interoperati...
Definition: pm_kind.F90:543
pm_kind::LK
integer, parameter LK
The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(....
Definition: pm_kind.F90:541
pm_kind::IK
integer, parameter IK
The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoper...
Definition: pm_kind.F90:540
pm_test
This module contains a simple unit-testing framework for the Fortran libraries, including the ParaMon...
Definition: pm_test.F90:42
test_pm_arrayRank
This module contains tests of the module pm_arrayRank.
Definition: test_pm_arrayRank.F90:26
test_pm_arrayRank::test
type(test_type) test
Definition: test_pm_arrayRank.F90:35
test_pm_arrayRank::setTest
subroutine setTest()
Definition: test_pm_arrayRank.F90:1384
pm_test::test_type
This is the derived type test_type for generating objects that facilitate testing of a series of proc...
Definition: pm_test.F90:209