Line data Source code
1 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
2 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
3 : !!!! !!!!
4 : !!!! ParaMonte: Parallel Monte Carlo and Machine Learning Library. !!!!
5 : !!!! !!!!
6 : !!!! Copyright (C) 2012-present, The Computational Data Science Lab !!!!
7 : !!!! !!!!
8 : !!!! This file is part of the ParaMonte library. !!!!
9 : !!!! !!!!
10 : !!!! LICENSE !!!!
11 : !!!! !!!!
12 : !!!! https://github.com/cdslaborg/paramonte/blob/main/LICENSE.md !!!!
13 : !!!! !!!!
14 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
15 : !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16 :
17 : !> \brief This module contains tests of the module [pm_cosmicRate](@ref pm_cosmicRate).
18 : !>
19 : !> \fintest
20 : !>
21 : !> \author
22 : !> \FatemehBagheri, 12:27 AM Tuesday, February 22, 2022, Dallas, TX
23 :
24 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
25 :
26 : module test_pm_cosmicRate
27 :
28 : use pm_cosmicRate
29 : use pm_err, only: err_type
30 : use pm_test, only: test_type, IK, LK
31 :
32 : implicit none
33 :
34 : private
35 : public :: setTest
36 : type(test_type) :: test
37 :
38 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
39 :
40 : interface
41 :
42 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
43 :
44 : #if RK5_ENABLED
45 : module function test_getLogRateDensityH06_D0_RK5() result(assertion); logical(LK) :: assertion; end function
46 : #endif
47 : #if RK4_ENABLED
48 : module function test_getLogRateDensityH06_D0_RK4() result(assertion); logical(LK) :: assertion; end function
49 : #endif
50 : #if RK3_ENABLED
51 : module function test_getLogRateDensityH06_D0_RK3() result(assertion); logical(LK) :: assertion; end function
52 : #endif
53 : #if RK2_ENABLED
54 : module function test_getLogRateDensityH06_D0_RK2() result(assertion); logical(LK) :: assertion; end function
55 : #endif
56 : #if RK1_ENABLED
57 : module function test_getLogRateDensityH06_D0_RK1() result(assertion); logical(LK) :: assertion; end function
58 : #endif
59 :
60 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
61 :
62 : end interface
63 :
64 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
65 :
66 : interface
67 :
68 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
69 :
70 : #if RK5_ENABLED
71 : module function test_getLogRateDensityL08_D0_RK5() result(assertion); logical(LK) :: assertion; end function
72 : #endif
73 : #if RK4_ENABLED
74 : module function test_getLogRateDensityL08_D0_RK4() result(assertion); logical(LK) :: assertion; end function
75 : #endif
76 : #if RK3_ENABLED
77 : module function test_getLogRateDensityL08_D0_RK3() result(assertion); logical(LK) :: assertion; end function
78 : #endif
79 : #if RK2_ENABLED
80 : module function test_getLogRateDensityL08_D0_RK2() result(assertion); logical(LK) :: assertion; end function
81 : #endif
82 : #if RK1_ENABLED
83 : module function test_getLogRateDensityL08_D0_RK1() result(assertion); logical(LK) :: assertion; end function
84 : #endif
85 :
86 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
87 :
88 : end interface
89 :
90 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
91 :
92 : interface
93 :
94 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
95 :
96 : #if RK5_ENABLED
97 : module function test_getLogRateDensityB10_D0_RK5() result(assertion); logical(LK) :: assertion; end function
98 : #endif
99 : #if RK4_ENABLED
100 : module function test_getLogRateDensityB10_D0_RK4() result(assertion); logical(LK) :: assertion; end function
101 : #endif
102 : #if RK3_ENABLED
103 : module function test_getLogRateDensityB10_D0_RK3() result(assertion); logical(LK) :: assertion; end function
104 : #endif
105 : #if RK2_ENABLED
106 : module function test_getLogRateDensityB10_D0_RK2() result(assertion); logical(LK) :: assertion; end function
107 : #endif
108 : #if RK1_ENABLED
109 : module function test_getLogRateDensityB10_D0_RK1() result(assertion); logical(LK) :: assertion; end function
110 : #endif
111 :
112 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
113 :
114 : end interface
115 :
116 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
117 :
118 : interface
119 :
120 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
121 :
122 : #if RK5_ENABLED
123 : module function test_getLogRateDensityM14_D0_RK5() result(assertion); logical(LK) :: assertion; end function
124 : #endif
125 : #if RK4_ENABLED
126 : module function test_getLogRateDensityM14_D0_RK4() result(assertion); logical(LK) :: assertion; end function
127 : #endif
128 : #if RK3_ENABLED
129 : module function test_getLogRateDensityM14_D0_RK3() result(assertion); logical(LK) :: assertion; end function
130 : #endif
131 : #if RK2_ENABLED
132 : module function test_getLogRateDensityM14_D0_RK2() result(assertion); logical(LK) :: assertion; end function
133 : #endif
134 : #if RK1_ENABLED
135 : module function test_getLogRateDensityM14_D0_RK1() result(assertion); logical(LK) :: assertion; end function
136 : #endif
137 :
138 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
139 :
140 : end interface
141 :
142 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
143 :
144 : interface
145 :
146 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
147 :
148 : #if RK5_ENABLED
149 : module function test_getLogRateDensityP15_D0_RK5() result(assertion); logical(LK) :: assertion; end function
150 : #endif
151 : #if RK4_ENABLED
152 : module function test_getLogRateDensityP15_D0_RK4() result(assertion); logical(LK) :: assertion; end function
153 : #endif
154 : #if RK3_ENABLED
155 : module function test_getLogRateDensityP15_D0_RK3() result(assertion); logical(LK) :: assertion; end function
156 : #endif
157 : #if RK2_ENABLED
158 : module function test_getLogRateDensityP15_D0_RK2() result(assertion); logical(LK) :: assertion; end function
159 : #endif
160 : #if RK1_ENABLED
161 : module function test_getLogRateDensityP15_D0_RK1() result(assertion); logical(LK) :: assertion; end function
162 : #endif
163 :
164 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
165 :
166 : end interface
167 :
168 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
169 :
170 : interface
171 :
172 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
173 :
174 : #if RK5_ENABLED
175 : module function test_getLogRateDensityM17_D0_RK5() result(assertion); logical(LK) :: assertion; end function
176 : #endif
177 : #if RK4_ENABLED
178 : module function test_getLogRateDensityM17_D0_RK4() result(assertion); logical(LK) :: assertion; end function
179 : #endif
180 : #if RK3_ENABLED
181 : module function test_getLogRateDensityM17_D0_RK3() result(assertion); logical(LK) :: assertion; end function
182 : #endif
183 : #if RK2_ENABLED
184 : module function test_getLogRateDensityM17_D0_RK2() result(assertion); logical(LK) :: assertion; end function
185 : #endif
186 : #if RK1_ENABLED
187 : module function test_getLogRateDensityM17_D0_RK1() result(assertion); logical(LK) :: assertion; end function
188 : #endif
189 :
190 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
191 :
192 : end interface
193 :
194 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
195 :
196 : interface
197 :
198 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
199 :
200 : #if RK5_ENABLED
201 : module function test_getLogRateDensityF18_D0_RK5() result(assertion); logical(LK) :: assertion; end function
202 : #endif
203 : #if RK4_ENABLED
204 : module function test_getLogRateDensityF18_D0_RK4() result(assertion); logical(LK) :: assertion; end function
205 : #endif
206 : #if RK3_ENABLED
207 : module function test_getLogRateDensityF18_D0_RK3() result(assertion); logical(LK) :: assertion; end function
208 : #endif
209 : #if RK2_ENABLED
210 : module function test_getLogRateDensityF18_D0_RK2() result(assertion); logical(LK) :: assertion; end function
211 : #endif
212 : #if RK1_ENABLED
213 : module function test_getLogRateDensityF18_D0_RK1() result(assertion); logical(LK) :: assertion; end function
214 : #endif
215 :
216 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
217 :
218 : end interface
219 :
220 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
221 :
222 : contains
223 :
224 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
225 :
226 1 : subroutine setTest()
227 :
228 1 : test = test_type(MODULE_NAME)
229 :
230 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
231 :
232 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
233 :
234 : #if RK5_ENABLED
235 : call test%run(test_getLogRateDensityH06_D0_RK5, SK_"test_getLogRateDensityH06_D0_RK5")
236 : #endif
237 : #if RK4_ENABLED
238 1 : call test%run(test_getLogRateDensityH06_D0_RK4, SK_"test_getLogRateDensityH06_D0_RK4")
239 : #endif
240 : #if RK3_ENABLED
241 1 : call test%run(test_getLogRateDensityH06_D0_RK3, SK_"test_getLogRateDensityH06_D0_RK3")
242 : #endif
243 : #if RK3_ENABLED
244 1 : call test%run(test_getLogRateDensityH06_D0_RK3, SK_"test_getLogRateDensityH06_D0_RK3")
245 : #endif
246 : #if RK2_ENABLED
247 1 : call test%run(test_getLogRateDensityH06_D0_RK2, SK_"test_getLogRateDensityH06_D0_RK2")
248 : #endif
249 : #if RK1_ENABLED
250 1 : call test%run(test_getLogRateDensityH06_D0_RK1, SK_"test_getLogRateDensityH06_D0_RK1")
251 : #endif
252 :
253 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
254 :
255 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
256 :
257 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
258 :
259 : #if RK5_ENABLED
260 : call test%run(test_getLogRateDensityL08_D0_RK5, SK_"test_getLogRateDensityL08_D0_RK5")
261 : #endif
262 : #if RK4_ENABLED
263 1 : call test%run(test_getLogRateDensityL08_D0_RK4, SK_"test_getLogRateDensityL08_D0_RK4")
264 : #endif
265 : #if RK3_ENABLED
266 1 : call test%run(test_getLogRateDensityL08_D0_RK3, SK_"test_getLogRateDensityL08_D0_RK3")
267 : #endif
268 : #if RK3_ENABLED
269 1 : call test%run(test_getLogRateDensityL08_D0_RK3, SK_"test_getLogRateDensityL08_D0_RK3")
270 : #endif
271 : #if RK2_ENABLED
272 1 : call test%run(test_getLogRateDensityL08_D0_RK2, SK_"test_getLogRateDensityL08_D0_RK2")
273 : #endif
274 : #if RK1_ENABLED
275 1 : call test%run(test_getLogRateDensityL08_D0_RK1, SK_"test_getLogRateDensityL08_D0_RK1")
276 : #endif
277 :
278 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
279 :
280 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
281 :
282 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
283 :
284 : #if RK5_ENABLED
285 : call test%run(test_getLogRateDensityB10_D0_RK5, SK_"test_getLogRateDensityB10_D0_RK5")
286 : #endif
287 : #if RK4_ENABLED
288 1 : call test%run(test_getLogRateDensityB10_D0_RK4, SK_"test_getLogRateDensityB10_D0_RK4")
289 : #endif
290 : #if RK3_ENABLED
291 1 : call test%run(test_getLogRateDensityB10_D0_RK3, SK_"test_getLogRateDensityB10_D0_RK3")
292 : #endif
293 : #if RK3_ENABLED
294 1 : call test%run(test_getLogRateDensityB10_D0_RK3, SK_"test_getLogRateDensityB10_D0_RK3")
295 : #endif
296 : #if RK2_ENABLED
297 1 : call test%run(test_getLogRateDensityB10_D0_RK2, SK_"test_getLogRateDensityB10_D0_RK2")
298 : #endif
299 : #if RK1_ENABLED
300 1 : call test%run(test_getLogRateDensityB10_D0_RK1, SK_"test_getLogRateDensityB10_D0_RK1")
301 : #endif
302 :
303 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
304 :
305 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
306 :
307 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
308 :
309 : #if RK5_ENABLED
310 : call test%run(test_getLogRateDensityM14_D0_RK5, SK_"test_getLogRateDensityM14_D0_RK5")
311 : #endif
312 : #if RK4_ENABLED
313 1 : call test%run(test_getLogRateDensityM14_D0_RK4, SK_"test_getLogRateDensityM14_D0_RK4")
314 : #endif
315 : #if RK3_ENABLED
316 1 : call test%run(test_getLogRateDensityM14_D0_RK3, SK_"test_getLogRateDensityM14_D0_RK3")
317 : #endif
318 : #if RK3_ENABLED
319 1 : call test%run(test_getLogRateDensityM14_D0_RK3, SK_"test_getLogRateDensityM14_D0_RK3")
320 : #endif
321 : #if RK2_ENABLED
322 1 : call test%run(test_getLogRateDensityM14_D0_RK2, SK_"test_getLogRateDensityM14_D0_RK2")
323 : #endif
324 : #if RK1_ENABLED
325 1 : call test%run(test_getLogRateDensityM14_D0_RK1, SK_"test_getLogRateDensityM14_D0_RK1")
326 : #endif
327 :
328 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
329 :
330 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
331 :
332 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
333 :
334 : #if RK5_ENABLED
335 : call test%run(test_getLogRateDensityP15_D0_RK5, SK_"test_getLogRateDensityP15_D0_RK5")
336 : #endif
337 : #if RK4_ENABLED
338 1 : call test%run(test_getLogRateDensityP15_D0_RK4, SK_"test_getLogRateDensityP15_D0_RK4")
339 : #endif
340 : #if RK3_ENABLED
341 1 : call test%run(test_getLogRateDensityP15_D0_RK3, SK_"test_getLogRateDensityP15_D0_RK3")
342 : #endif
343 : #if RK3_ENABLED
344 1 : call test%run(test_getLogRateDensityP15_D0_RK3, SK_"test_getLogRateDensityP15_D0_RK3")
345 : #endif
346 : #if RK2_ENABLED
347 1 : call test%run(test_getLogRateDensityP15_D0_RK2, SK_"test_getLogRateDensityP15_D0_RK2")
348 : #endif
349 : #if RK1_ENABLED
350 1 : call test%run(test_getLogRateDensityP15_D0_RK1, SK_"test_getLogRateDensityP15_D0_RK1")
351 : #endif
352 :
353 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
354 :
355 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
356 :
357 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
358 :
359 : #if RK5_ENABLED
360 : call test%run(test_getLogRateDensityM17_D0_RK5, SK_"test_getLogRateDensityM17_D0_RK5")
361 : #endif
362 : #if RK4_ENABLED
363 1 : call test%run(test_getLogRateDensityM17_D0_RK4, SK_"test_getLogRateDensityM17_D0_RK4")
364 : #endif
365 : #if RK3_ENABLED
366 1 : call test%run(test_getLogRateDensityM17_D0_RK3, SK_"test_getLogRateDensityM17_D0_RK3")
367 : #endif
368 : #if RK3_ENABLED
369 1 : call test%run(test_getLogRateDensityM17_D0_RK3, SK_"test_getLogRateDensityM17_D0_RK3")
370 : #endif
371 : #if RK2_ENABLED
372 1 : call test%run(test_getLogRateDensityM17_D0_RK2, SK_"test_getLogRateDensityM17_D0_RK2")
373 : #endif
374 : #if RK1_ENABLED
375 1 : call test%run(test_getLogRateDensityM17_D0_RK1, SK_"test_getLogRateDensityM17_D0_RK1")
376 : #endif
377 :
378 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
379 :
380 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
381 :
382 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
383 :
384 : #if RK5_ENABLED
385 : call test%run(test_getLogRateDensityF18_D0_RK5, SK_"test_getLogRateDensityF18_D0_RK5")
386 : #endif
387 : #if RK4_ENABLED
388 1 : call test%run(test_getLogRateDensityF18_D0_RK4, SK_"test_getLogRateDensityF18_D0_RK4")
389 : #endif
390 : #if RK3_ENABLED
391 1 : call test%run(test_getLogRateDensityF18_D0_RK3, SK_"test_getLogRateDensityF18_D0_RK3")
392 : #endif
393 : #if RK3_ENABLED
394 1 : call test%run(test_getLogRateDensityF18_D0_RK3, SK_"test_getLogRateDensityF18_D0_RK3")
395 : #endif
396 : #if RK2_ENABLED
397 1 : call test%run(test_getLogRateDensityF18_D0_RK2, SK_"test_getLogRateDensityF18_D0_RK2")
398 : #endif
399 : #if RK1_ENABLED
400 1 : call test%run(test_getLogRateDensityF18_D0_RK1, SK_"test_getLogRateDensityF18_D0_RK1")
401 : #endif
402 :
403 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
404 :
405 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
406 1 : call test%summarize()
407 :
408 1 : end subroutine setTest
409 :
410 : !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
411 :
412 : end module test_pm_cosmicRate
|
