160 PURE module function getLogSumExpDefSeq_CK5(array)
result(logSumExp)
161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
162 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_CK5
165 complex(CKG),
intent(in),
contiguous :: array(:)
166 complex(CKG) :: logSumExp
171 PURE module function getLogSumExpDefSeq_CK4(array)
result(logSumExp)
172#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
173 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_CK4
176 complex(CKG),
intent(in),
contiguous :: array(:)
177 complex(CKG) :: logSumExp
182 PURE module function getLogSumExpDefSeq_CK3(array)
result(logSumExp)
183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
184 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_CK3
187 complex(CKG),
intent(in),
contiguous :: array(:)
188 complex(CKG) :: logSumExp
193 PURE module function getLogSumExpDefSeq_CK2(array)
result(logSumExp)
194#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
195 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_CK2
198 complex(CKG),
intent(in),
contiguous :: array(:)
199 complex(CKG) :: logSumExp
204 PURE module function getLogSumExpDefSeq_CK1(array)
result(logSumExp)
205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
206 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_CK1
209 complex(CKG),
intent(in),
contiguous :: array(:)
210 complex(CKG) :: logSumExp
217 PURE module function getLogSumExpDefSeq_RK5(array)
result(logSumExp)
218#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
219 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_RK5
222 real(RKG) ,
intent(in),
contiguous :: array(:)
223 real(RKG) :: logSumExp
228 PURE module function getLogSumExpDefSeq_RK4(array)
result(logSumExp)
229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
230 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_RK4
233 real(RKG) ,
intent(in),
contiguous :: array(:)
234 real(RKG) :: logSumExp
239 PURE module function getLogSumExpDefSeq_RK3(array)
result(logSumExp)
240#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
241 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_RK3
244 real(RKG) ,
intent(in),
contiguous :: array(:)
245 real(RKG) :: logSumExp
250 PURE module function getLogSumExpDefSeq_RK2(array)
result(logSumExp)
251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
252 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_RK2
255 real(RKG) ,
intent(in),
contiguous :: array(:)
256 real(RKG) :: logSumExp
261 PURE module function getLogSumExpDefSeq_RK1(array)
result(logSumExp)
262#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
263 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpDefSeq_RK1
266 real(RKG) ,
intent(in),
contiguous :: array(:)
267 real(RKG) :: logSumExp
284 PURE module function getLogSumExpMaxSeq_CK5(array, maxArray)
result(logSumExp)
285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
286 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_CK5
289 complex(CKG),
intent(in),
contiguous :: array(:)
290 complex(CKG),
intent(in) :: maxArray
291 complex(CKG) :: logSumExp
296 PURE module function getLogSumExpMaxSeq_CK4(array, maxArray)
result(logSumExp)
297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
298 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_CK4
301 complex(CKG),
intent(in),
contiguous :: array(:)
302 complex(CKG),
intent(in) :: maxArray
303 complex(CKG) :: logSumExp
308 PURE module function getLogSumExpMaxSeq_CK3(array, maxArray)
result(logSumExp)
309#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
310 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_CK3
313 complex(CKG),
intent(in),
contiguous :: array(:)
314 complex(CKG),
intent(in) :: maxArray
315 complex(CKG) :: logSumExp
320 PURE module function getLogSumExpMaxSeq_CK2(array, maxArray)
result(logSumExp)
321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
322 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_CK2
325 complex(CKG),
intent(in),
contiguous :: array(:)
326 complex(CKG),
intent(in) :: maxArray
327 complex(CKG) :: logSumExp
332 PURE module function getLogSumExpMaxSeq_CK1(array, maxArray)
result(logSumExp)
333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
334 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_CK1
337 complex(CKG),
intent(in),
contiguous :: array(:)
338 complex(CKG),
intent(in) :: maxArray
339 complex(CKG) :: logSumExp
346 PURE module function getLogSumExpMaxSeq_RK5(array, maxArray)
result(logSumExp)
347#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
348 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_RK5
351 real(RKG) ,
intent(in),
contiguous :: array(:)
352 real(RKG) ,
intent(in) :: maxArray
353 real(RKG) :: logSumExp
358 PURE module function getLogSumExpMaxSeq_RK4(array, maxArray)
result(logSumExp)
359#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
360 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_RK4
363 real(RKG) ,
intent(in),
contiguous :: array(:)
364 real(RKG) ,
intent(in) :: maxArray
365 real(RKG) :: logSumExp
370 PURE module function getLogSumExpMaxSeq_RK3(array, maxArray)
result(logSumExp)
371#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
372 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_RK3
375 real(RKG) ,
intent(in),
contiguous :: array(:)
376 real(RKG) ,
intent(in) :: maxArray
377 real(RKG) :: logSumExp
382 PURE module function getLogSumExpMaxSeq_RK2(array, maxArray)
result(logSumExp)
383#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
384 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_RK2
387 real(RKG) ,
intent(in),
contiguous :: array(:)
388 real(RKG) ,
intent(in) :: maxArray
389 real(RKG) :: logSumExp
394 PURE module function getLogSumExpMaxSeq_RK1(array, maxArray)
result(logSumExp)
395#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
396 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSeq_RK1
399 real(RKG) ,
intent(in),
contiguous :: array(:)
400 real(RKG) ,
intent(in) :: maxArray
401 real(RKG) :: logSumExp
414 PURE module function getLogSumExpMaxSel_CK5(array, maxArray, control)
result(logSumExp)
415#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
416 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_CK5
419 type(selection_type),
intent(in) :: control
420 complex(CKG) ,
intent(in),
contiguous :: array(:)
421 complex(CKG) ,
intent(in) :: maxArray
422 complex(CKG) :: logSumExp
427 PURE module function getLogSumExpMaxSel_CK4(array, maxArray, control)
result(logSumExp)
428#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
429 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_CK4
432 type(selection_type),
intent(in) :: control
433 complex(CKG) ,
intent(in),
contiguous :: array(:)
434 complex(CKG) ,
intent(in) :: maxArray
435 complex(CKG) :: logSumExp
440 PURE module function getLogSumExpMaxSel_CK3(array, maxArray, control)
result(logSumExp)
441#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
442 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_CK3
445 type(selection_type),
intent(in) :: control
446 complex(CKG) ,
intent(in),
contiguous :: array(:)
447 complex(CKG) ,
intent(in) :: maxArray
448 complex(CKG) :: logSumExp
453 PURE module function getLogSumExpMaxSel_CK2(array, maxArray, control)
result(logSumExp)
454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
455 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_CK2
458 type(selection_type),
intent(in) :: control
459 complex(CKG) ,
intent(in),
contiguous :: array(:)
460 complex(CKG) ,
intent(in) :: maxArray
461 complex(CKG) :: logSumExp
466 PURE module function getLogSumExpMaxSel_CK1(array, maxArray, control)
result(logSumExp)
467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
468 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_CK1
471 type(selection_type),
intent(in) :: control
472 complex(CKG) ,
intent(in),
contiguous :: array(:)
473 complex(CKG) ,
intent(in) :: maxArray
474 complex(CKG) :: logSumExp
481 PURE module function getLogSumExpMaxSel_RK5(array, maxArray, control)
result(logSumExp)
482#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
483 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_RK5
486 type(selection_type),
intent(in) :: control
487 real(RKG) ,
intent(in),
contiguous :: array(:)
488 real(RKG) ,
intent(in) :: maxArray
489 real(RKG) :: logSumExp
494 PURE module function getLogSumExpMaxSel_RK4(array, maxArray, control)
result(logSumExp)
495#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
496 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_RK4
499 type(selection_type),
intent(in) :: control
500 real(RKG) ,
intent(in),
contiguous :: array(:)
501 real(RKG) ,
intent(in) :: maxArray
502 real(RKG) :: logSumExp
507 PURE module function getLogSumExpMaxSel_RK3(array, maxArray, control)
result(logSumExp)
508#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
509 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_RK3
512 type(selection_type),
intent(in) :: control
513 real(RKG) ,
intent(in),
contiguous :: array(:)
514 real(RKG) ,
intent(in) :: maxArray
515 real(RKG) :: logSumExp
520 PURE module function getLogSumExpMaxSel_RK2(array, maxArray, control)
result(logSumExp)
521#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
522 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_RK2
525 type(selection_type),
intent(in) :: control
526 real(RKG) ,
intent(in),
contiguous :: array(:)
527 real(RKG) ,
intent(in) :: maxArray
528 real(RKG) :: logSumExp
533 PURE module function getLogSumExpMaxSel_RK1(array, maxArray, control)
result(logSumExp)
534#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
535 !DEC$ ATTRIBUTES DLLEXPORT :: getLogSumExpMaxSel_RK1
538 type(selection_type),
intent(in) :: control
539 real(RKG) ,
intent(in),
contiguous :: array(:)
540 real(RKG) ,
intent(in) :: maxArray
541 real(RKG) :: logSumExp
Generate and return the natural logarithm of the sum of the exponential of the input array robustly (...
This module contains abstract and concrete derived types that are required for compile-time resolutio...
character(*, SK), parameter MODULE_NAME
type(selection_type), parameter selection
This is a scalar parameter object of type selection_type that is exclusively used to request selectio...
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
integer, parameter LK
The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(....
integer, parameter IK
The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoper...
integer, parameter SK
The default character kind in the ParaMonte library: kind("a") in Fortran, c_char in C-Fortran Intero...
This module contains the procedures and interfaces for computing the natural logarithm of the sum of ...
This is a concrete derived type whose instances are exclusively used to request selection control flo...