72 integer(
IK) :: size
= 0_IK
76 integer(
IK) :: smin
= 2_IK
77 integer(
IK) :: smax
= huge(
0_IK)
78 integer(
IK) :: step
= 1_IK
82#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
83 !DIR$ ATTRIBUTES DLLEXPORT ::
cumSum
86#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
90#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
94#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
229 module function getACT_DEF_ONE_D1_RK5(seq)
result(act)
230#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
231 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_ONE_D1_RK5
234 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
240 module function getACT_DEF_ONE_D1_RK4(seq)
result(act)
241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
242 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_ONE_D1_RK4
245 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
251 module function getACT_DEF_ONE_D1_RK3(seq)
result(act)
252#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
253 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_ONE_D1_RK3
256 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
262 module function getACT_DEF_ONE_D1_RK2(seq)
result(act)
263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
264 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_ONE_D1_RK2
267 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
273 module function getACT_DEF_ONE_D1_RK1(seq)
result(act)
274#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
275 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_ONE_D1_RK1
278 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
286 module function getACT_DEF_WTI_D1_RK5(seq, weight)
result(act)
287#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
288 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_WTI_D1_RK5
291 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
292 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
298 module function getACT_DEF_WTI_D1_RK4(seq, weight)
result(act)
299#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
300 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_WTI_D1_RK4
303 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
304 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
310 module function getACT_DEF_WTI_D1_RK3(seq, weight)
result(act)
311#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
312 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_WTI_D1_RK3
315 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
316 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
322 module function getACT_DEF_WTI_D1_RK2(seq, weight)
result(act)
323#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
324 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_WTI_D1_RK2
327 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
328 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
334 module function getACT_DEF_WTI_D1_RK1(seq, weight)
result(act)
335#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
336 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_DEF_WTI_D1_RK1
339 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
340 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
354 module function getACT_CSD_ONE_D1_RK5(seq, method)
result(act)
355#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
356 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_ONE_D1_RK5
359 type(cumSum_type) ,
intent(in) :: method
360 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
366 module function getACT_CSD_ONE_D1_RK4(seq, method)
result(act)
367#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
368 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_ONE_D1_RK4
371 type(cumSum_type) ,
intent(in) :: method
372 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
378 module function getACT_CSD_ONE_D1_RK3(seq, method)
result(act)
379#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
380 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_ONE_D1_RK3
383 type(cumSum_type) ,
intent(in) :: method
384 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
390 module function getACT_CSD_ONE_D1_RK2(seq, method)
result(act)
391#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
392 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_ONE_D1_RK2
395 type(cumSum_type) ,
intent(in) :: method
396 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
402 module function getACT_CSD_ONE_D1_RK1(seq, method)
result(act)
403#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
404 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_ONE_D1_RK1
407 type(cumSum_type) ,
intent(in) :: method
408 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
416 module function getACT_CSD_WTI_D1_RK5(seq, weight, method)
result(act)
417#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
418 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_WTI_D1_RK5
421 type(cumSum_type) ,
intent(in) :: method
422 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
423 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
429 module function getACT_CSD_WTI_D1_RK4(seq, weight, method)
result(act)
430#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
431 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_WTI_D1_RK4
434 type(cumSum_type) ,
intent(in) :: method
435 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
436 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
442 module function getACT_CSD_WTI_D1_RK3(seq, weight, method)
result(act)
443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
444 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_WTI_D1_RK3
447 type(cumSum_type) ,
intent(in) :: method
448 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
449 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
455 module function getACT_CSD_WTI_D1_RK2(seq, weight, method)
result(act)
456#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
457 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_WTI_D1_RK2
460 type(cumSum_type) ,
intent(in) :: method
461 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
462 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
468 module function getACT_CSD_WTI_D1_RK1(seq, weight, method)
result(act)
469#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
470 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSD_WTI_D1_RK1
473 type(cumSum_type) ,
intent(in) :: method
474 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
475 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
489 module function getACT_CSM_ONE_D1_RK5(seq, method)
result(act)
490#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
491 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_ONE_D1_RK5
494 type(cumSumMax_type) ,
intent(in) :: method
495 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
501 module function getACT_CSM_ONE_D1_RK4(seq, method)
result(act)
502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
503 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_ONE_D1_RK4
506 type(cumSumMax_type) ,
intent(in) :: method
507 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
513 module function getACT_CSM_ONE_D1_RK3(seq, method)
result(act)
514#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
515 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_ONE_D1_RK3
518 type(cumSumMax_type) ,
intent(in) :: method
519 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
525 module function getACT_CSM_ONE_D1_RK2(seq, method)
result(act)
526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
527 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_ONE_D1_RK2
530 type(cumSumMax_type) ,
intent(in) :: method
531 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
537 module function getACT_CSM_ONE_D1_RK1(seq, method)
result(act)
538#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
539 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_ONE_D1_RK1
542 type(cumSumMax_type) ,
intent(in) :: method
543 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
551 module function getACT_CSM_WTI_D1_RK5(seq, weight, method)
result(act)
552#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
553 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_WTI_D1_RK5
556 type(cumSumMax_type) ,
intent(in) :: method
557 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
558 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
564 module function getACT_CSM_WTI_D1_RK4(seq, weight, method)
result(act)
565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
566 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_WTI_D1_RK4
569 type(cumSumMax_type) ,
intent(in) :: method
570 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
571 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
577 module function getACT_CSM_WTI_D1_RK3(seq, weight, method)
result(act)
578#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
579 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_WTI_D1_RK3
582 type(cumSumMax_type) ,
intent(in) :: method
583 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
584 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
590 module function getACT_CSM_WTI_D1_RK2(seq, weight, method)
result(act)
591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
592 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_WTI_D1_RK2
595 type(cumSumMax_type) ,
intent(in) :: method
596 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
597 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
603 module function getACT_CSM_WTI_D1_RK1(seq, weight, method)
result(act)
604#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
605 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_CSM_WTI_D1_RK1
608 type(cumSumMax_type) ,
intent(in) :: method
609 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
610 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
624 module function getACT_BMD_ONE_D1_RK5(seq, method)
result(act)
625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
626 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_ONE_D1_RK5
629 type(batchMeans_type) ,
intent(in) :: method
630 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
636 module function getACT_BMD_ONE_D1_RK4(seq, method)
result(act)
637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
638 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_ONE_D1_RK4
641 type(batchMeans_type) ,
intent(in) :: method
642 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
648 module function getACT_BMD_ONE_D1_RK3(seq, method)
result(act)
649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
650 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_ONE_D1_RK3
653 type(batchMeans_type) ,
intent(in) :: method
654 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
660 module function getACT_BMD_ONE_D1_RK2(seq, method)
result(act)
661#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
662 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_ONE_D1_RK2
665 type(batchMeans_type) ,
intent(in) :: method
666 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
672 module function getACT_BMD_ONE_D1_RK1(seq, method)
result(act)
673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
674 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_ONE_D1_RK1
677 type(batchMeans_type) ,
intent(in) :: method
678 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
686 module function getACT_BMD_WTI_D1_RK5(seq, weight, method)
result(act)
687#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
688 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_WTI_D1_RK5
691 type(batchMeans_type) ,
intent(in) :: method
692 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
693 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
699 module function getACT_BMD_WTI_D1_RK4(seq, weight, method)
result(act)
700#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
701 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_WTI_D1_RK4
704 type(batchMeans_type) ,
intent(in) :: method
705 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
706 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
712 module function getACT_BMD_WTI_D1_RK3(seq, weight, method)
result(act)
713#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
714 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_WTI_D1_RK3
717 type(batchMeans_type) ,
intent(in) :: method
718 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
719 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
725 module function getACT_BMD_WTI_D1_RK2(seq, weight, method)
result(act)
726#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
727 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_WTI_D1_RK2
730 type(batchMeans_type) ,
intent(in) :: method
731 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
732 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
738 module function getACT_BMD_WTI_D1_RK1(seq, weight, method)
result(act)
739#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
740 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMD_WTI_D1_RK1
743 type(batchMeans_type) ,
intent(in) :: method
744 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
745 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
759 module function getACT_BMM_ONE_D1_RK5(seq, method)
result(act)
760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
761 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_ONE_D1_RK5
764 type(batchMeansMax_type),
intent(in) :: method
765 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
771 module function getACT_BMM_ONE_D1_RK4(seq, method)
result(act)
772#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
773 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_ONE_D1_RK4
776 type(batchMeansMax_type),
intent(in) :: method
777 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
783 module function getACT_BMM_ONE_D1_RK3(seq, method)
result(act)
784#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
785 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_ONE_D1_RK3
788 type(batchMeansMax_type),
intent(in) :: method
789 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
795 module function getACT_BMM_ONE_D1_RK2(seq, method)
result(act)
796#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
797 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_ONE_D1_RK2
800 type(batchMeansMax_type),
intent(in) :: method
801 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
807 module function getACT_BMM_ONE_D1_RK1(seq, method)
result(act)
808#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
809 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_ONE_D1_RK1
812 type(batchMeansMax_type),
intent(in) :: method
813 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
821 module function getACT_BMM_WTI_D1_RK5(seq, weight, method)
result(act)
822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
823 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_WTI_D1_RK5
826 type(batchMeansMax_type),
intent(in) :: method
827 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
828 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
834 module function getACT_BMM_WTI_D1_RK4(seq, weight, method)
result(act)
835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
836 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_WTI_D1_RK4
839 type(batchMeansMax_type),
intent(in) :: method
840 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
841 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
847 module function getACT_BMM_WTI_D1_RK3(seq, weight, method)
result(act)
848#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
849 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_WTI_D1_RK3
852 type(batchMeansMax_type),
intent(in) :: method
853 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
854 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
860 module function getACT_BMM_WTI_D1_RK2(seq, weight, method)
result(act)
861#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
862 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_WTI_D1_RK2
865 type(batchMeansMax_type),
intent(in) :: method
866 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
867 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
873 module function getACT_BMM_WTI_D1_RK1(seq, weight, method)
result(act)
874#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
875 !DEC$ ATTRIBUTES DLLEXPORT :: getACT_BMM_WTI_D1_RK1
878 type(batchMeansMax_type),
intent(in) :: method
879 integer(IK) ,
intent(in) ,
contiguous :: weight(:)
880 real(RKG) ,
intent(in) ,
contiguous :: seq(:)
Generate and return the integrated auto-correlation time (ACT) of the discrete signal.
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 classes and procedures for computing properties related to the auto correlation ...
type(batchMeansMax_type), parameter batchMeansMax
character(*, SK), parameter MODULE_NAME
type(batchMeans_type), parameter batchMeans
type(cumSumMax_type), parameter cumSumMax
type(cumSum_type), parameter cumSum