216 PURE elemental module function getUnifCubLogPDF_RK5(logLenEdge, ndim)
result(logPDF)
217#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
218 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubLogPDF_RK5
221 integer(IK) ,
intent(in) :: ndim
222 real(RKG) ,
intent(in) :: logLenEdge
228 PURE elemental module function getUnifCubLogPDF_RK4(logLenEdge, ndim)
result(logPDF)
229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
230 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubLogPDF_RK4
233 integer(IK) ,
intent(in) :: ndim
234 real(RKG) ,
intent(in) :: logLenEdge
240 PURE elemental module function getUnifCubLogPDF_RK3(logLenEdge, ndim)
result(logPDF)
241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
242 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubLogPDF_RK3
245 integer(IK) ,
intent(in) :: ndim
246 real(RKG) ,
intent(in) :: logLenEdge
252 PURE elemental module function getUnifCubLogPDF_RK2(logLenEdge, ndim)
result(logPDF)
253#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
254 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubLogPDF_RK2
257 integer(IK) ,
intent(in) :: ndim
258 real(RKG) ,
intent(in) :: logLenEdge
264 PURE elemental module function getUnifCubLogPDF_RK1(logLenEdge, ndim)
result(logPDF)
265#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
266 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubLogPDF_RK1
269 integer(IK) ,
intent(in) :: ndim
270 real(RKG) ,
intent(in) :: logLenEdge
278 PURE module function getUnifRecLogPDF_RK5(logLenEdge)
result(logPDF)
279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
280 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecLogPDF_RK5
283 real(RKG) ,
intent(in) ,
contiguous :: logLenEdge(:)
289 PURE module function getUnifRecLogPDF_RK4(logLenEdge)
result(logPDF)
290#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
291 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecLogPDF_RK4
294 real(RKG) ,
intent(in) ,
contiguous :: logLenEdge(:)
300 PURE module function getUnifRecLogPDF_RK3(logLenEdge)
result(logPDF)
301#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
302 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecLogPDF_RK3
305 real(RKG) ,
intent(in) ,
contiguous :: logLenEdge(:)
311 PURE module function getUnifRecLogPDF_RK2(logLenEdge)
result(logPDF)
312#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
313 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecLogPDF_RK2
316 real(RKG) ,
intent(in) ,
contiguous :: logLenEdge(:)
322 PURE module function getUnifRecLogPDF_RK1(logLenEdge)
result(logPDF)
323#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
324 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecLogPDF_RK1
327 real(RKG) ,
intent(in) ,
contiguous :: logLenEdge(:)
335 PURE module function getUnifParLogPDF_RK5(repmat)
result(logPDF)
336#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
337 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParLogPDF_RK5
340 real(RKG) ,
intent(in) ,
contiguous :: repmat(:,:)
346 PURE module function getUnifParLogPDF_RK4(repmat)
result(logPDF)
347#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
348 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParLogPDF_RK4
351 real(RKG) ,
intent(in) ,
contiguous :: repmat(:,:)
357 PURE module function getUnifParLogPDF_RK3(repmat)
result(logPDF)
358#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
359 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParLogPDF_RK3
362 real(RKG) ,
intent(in) ,
contiguous :: repmat(:,:)
368 PURE module function getUnifParLogPDF_RK2(repmat)
result(logPDF)
369#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
370 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParLogPDF_RK2
373 real(RKG) ,
intent(in) ,
contiguous :: repmat(:,:)
379 PURE module function getUnifParLogPDF_RK1(repmat)
result(logPDF)
380#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
381 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParLogPDF_RK1
384 real(RKG) ,
intent(in) ,
contiguous :: repmat(:,:)
475 impure module function getUnifCubRandDU_RK5(ub, ndim)
result(rand)
476#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
477 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandDU_RK5
480 integer(IK) ,
intent(in) :: ndim
481 real(RKG) ,
intent(in) :: ub
482 real(RKG) :: rand(ndim)
487 impure module function getUnifCubRandDU_RK4(ub, ndim)
result(rand)
488#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
489 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandDU_RK4
492 integer(IK) ,
intent(in) :: ndim
493 real(RKG) ,
intent(in) :: ub
494 real(RKG) :: rand(ndim)
499 impure module function getUnifCubRandDU_RK3(ub, ndim)
result(rand)
500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
501 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandDU_RK3
504 integer(IK) ,
intent(in) :: ndim
505 real(RKG) ,
intent(in) :: ub
506 real(RKG) :: rand(ndim)
511 impure module function getUnifCubRandDU_RK2(ub, ndim)
result(rand)
512#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
513 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandDU_RK2
516 integer(IK) ,
intent(in) :: ndim
517 real(RKG) ,
intent(in) :: ub
518 real(RKG) :: rand(ndim)
523 impure module function getUnifCubRandDU_RK1(ub, ndim)
result(rand)
524#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
525 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandDU_RK1
528 integer(IK) ,
intent(in) :: ndim
529 real(RKG) ,
intent(in) :: ub
530 real(RKG) :: rand(ndim)
537 impure module function getUnifCubRandLU_RK5(lb, ub, ndim)
result(rand)
538#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
539 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandLU_RK5
542 integer(IK) ,
intent(in) :: ndim
543 real(RKG) ,
intent(in) :: lb, ub
544 real(RKG) :: rand(ndim)
549 impure module function getUnifCubRandLU_RK4(lb, ub, ndim)
result(rand)
550#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
551 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandLU_RK4
554 integer(IK) ,
intent(in) :: ndim
555 real(RKG) ,
intent(in) :: lb, ub
556 real(RKG) :: rand(ndim)
561 impure module function getUnifCubRandLU_RK3(lb, ub, ndim)
result(rand)
562#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
563 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandLU_RK3
566 integer(IK) ,
intent(in) :: ndim
567 real(RKG) ,
intent(in) :: lb, ub
568 real(RKG) :: rand(ndim)
573 impure module function getUnifCubRandLU_RK2(lb, ub, ndim)
result(rand)
574#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
575 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandLU_RK2
578 integer(IK) ,
intent(in) :: ndim
579 real(RKG) ,
intent(in) :: lb, ub
580 real(RKG) :: rand(ndim)
585 impure module function getUnifCubRandLU_RK1(lb, ub, ndim)
result(rand)
586#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
587 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifCubRandLU_RK1
590 integer(IK) ,
intent(in) :: ndim
591 real(RKG) ,
intent(in) :: lb, ub
592 real(RKG) :: rand(ndim)
599 impure module function getUnifRecRandDU_RK5(ub)
result(rand)
600#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
601 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandDU_RK5
604 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
605 real(RKG) :: rand(
size(ub,
1, IK))
610 impure module function getUnifRecRandDU_RK4(ub)
result(rand)
611#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
612 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandDU_RK4
615 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
616 real(RKG) :: rand(
size(ub,
1, IK))
621 impure module function getUnifRecRandDU_RK3(ub)
result(rand)
622#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
623 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandDU_RK3
626 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
627 real(RKG) :: rand(
size(ub,
1, IK))
632 impure module function getUnifRecRandDU_RK2(ub)
result(rand)
633#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
634 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandDU_RK2
637 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
638 real(RKG) :: rand(
size(ub,
1, IK))
643 impure module function getUnifRecRandDU_RK1(ub)
result(rand)
644#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
645 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandDU_RK1
648 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
649 real(RKG) :: rand(
size(ub,
1, IK))
656 impure module function getUnifRecRandLU_RK5(lb, ub)
result(rand)
657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
658 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandLU_RK5
661 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
662 real(RKG) :: rand(
size(ub,
1, IK))
667 impure module function getUnifRecRandLU_RK4(lb, ub)
result(rand)
668#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
669 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandLU_RK4
672 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
673 real(RKG) :: rand(
size(ub,
1, IK))
678 impure module function getUnifRecRandLU_RK3(lb, ub)
result(rand)
679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
680 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandLU_RK3
683 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
684 real(RKG) :: rand(
size(ub,
1, IK))
689 impure module function getUnifRecRandLU_RK2(lb, ub)
result(rand)
690#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
691 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandLU_RK2
694 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
695 real(RKG) :: rand(
size(ub,
1, IK))
700 impure module function getUnifRecRandLU_RK1(lb, ub)
result(rand)
701#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
702 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifRecRandLU_RK1
705 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
706 real(RKG) :: rand(
size(ub,
1, IK))
713 impure module function getUnifParRandDU_RK5(ub)
result(rand)
714#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
715 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandDU_RK5
718 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
719 real(RKG) :: rand(
size(ub,
1, IK))
724 impure module function getUnifParRandDU_RK4(ub)
result(rand)
725#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
726 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandDU_RK4
729 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
730 real(RKG) :: rand(
size(ub,
1, IK))
735 impure module function getUnifParRandDU_RK3(ub)
result(rand)
736#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
737 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandDU_RK3
740 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
741 real(RKG) :: rand(
size(ub,
1, IK))
746 impure module function getUnifParRandDU_RK2(ub)
result(rand)
747#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
748 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandDU_RK2
751 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
752 real(RKG) :: rand(
size(ub,
1, IK))
757 impure module function getUnifParRandDU_RK1(ub)
result(rand)
758#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
759 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandDU_RK1
762 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
763 real(RKG) :: rand(
size(ub,
1, IK))
770 impure module function getUnifParRandLU_RK5(lb, ub)
result(rand)
771#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
772 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandLU_RK5
775 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
776 real(RKG) :: rand(
size(ub,
1, IK))
781 impure module function getUnifParRandLU_RK4(lb, ub)
result(rand)
782#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
783 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandLU_RK4
786 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
787 real(RKG) :: rand(
size(ub,
1, IK))
792 impure module function getUnifParRandLU_RK3(lb, ub)
result(rand)
793#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
794 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandLU_RK3
797 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
798 real(RKG) :: rand(
size(ub,
1, IK))
803 impure module function getUnifParRandLU_RK2(lb, ub)
result(rand)
804#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
805 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandLU_RK2
808 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
809 real(RKG) :: rand(
size(ub,
1, IK))
814 impure module function getUnifParRandLU_RK1(lb, ub)
result(rand)
815#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
816 !DEC$ ATTRIBUTES DLLEXPORT :: getUnifParRandLU_RK1
819 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
820 real(RKG) :: rand(
size(ub,
1, IK))
925 PURE module subroutine setUnifCubRandDU_RK5(rand, ub)
926#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
927 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandDU_RK5
930 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
931 real(RKG) ,
intent(in) :: ub
936 PURE module subroutine setUnifCubRandDU_RK4(rand, ub)
937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
938 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandDU_RK4
941 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
942 real(RKG) ,
intent(in) :: ub
947 PURE module subroutine setUnifCubRandDU_RK3(rand, ub)
948#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
949 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandDU_RK3
952 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
953 real(RKG) ,
intent(in) :: ub
958 PURE module subroutine setUnifCubRandDU_RK2(rand, ub)
959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
960 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandDU_RK2
963 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
964 real(RKG) ,
intent(in) :: ub
969 PURE module subroutine setUnifCubRandDU_RK1(rand, ub)
970#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
971 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandDU_RK1
974 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
975 real(RKG) ,
intent(in) :: ub
982 PURE module subroutine setUnifCubRandLU_RK5(rand, lb, ub)
983#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
984 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandLU_RK5
987 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
988 real(RKG) ,
intent(in) :: lb, ub
993 PURE module subroutine setUnifCubRandLU_RK4(rand, lb, ub)
994#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
995 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandLU_RK4
998 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
999 real(RKG) ,
intent(in) :: lb, ub
1004 PURE module subroutine setUnifCubRandLU_RK3(rand, lb, ub)
1005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1006 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandLU_RK3
1009 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1010 real(RKG) ,
intent(in) :: lb, ub
1015 PURE module subroutine setUnifCubRandLU_RK2(rand, lb, ub)
1016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1017 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandLU_RK2
1020 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1021 real(RKG) ,
intent(in) :: lb, ub
1026 PURE module subroutine setUnifCubRandLU_RK1(rand, lb, ub)
1027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1028 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifCubRandLU_RK1
1031 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1032 real(RKG) ,
intent(in) :: lb, ub
1039 PURE module subroutine setUnifRecRandDU_RK5(rand, ub)
1040#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1041 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandDU_RK5
1044 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1045 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
1050 PURE module subroutine setUnifRecRandDU_RK4(rand, ub)
1051#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1052 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandDU_RK4
1055 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1056 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
1061 PURE module subroutine setUnifRecRandDU_RK3(rand, ub)
1062#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1063 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandDU_RK3
1066 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1067 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
1072 PURE module subroutine setUnifRecRandDU_RK2(rand, ub)
1073#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1074 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandDU_RK2
1077 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1078 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
1083 PURE module subroutine setUnifRecRandDU_RK1(rand, ub)
1084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1085 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandDU_RK1
1088 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1089 real(RKG) ,
intent(in) ,
contiguous :: ub(:)
1096 PURE module subroutine setUnifRecRandLU_RK5(rand, lb, ub)
1097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1098 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandLU_RK5
1101 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1102 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
1107 PURE module subroutine setUnifRecRandLU_RK4(rand, lb, ub)
1108#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1109 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandLU_RK4
1112 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1113 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
1118 PURE module subroutine setUnifRecRandLU_RK3(rand, lb, ub)
1119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1120 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandLU_RK3
1123 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1124 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
1129 PURE module subroutine setUnifRecRandLU_RK2(rand, lb, ub)
1130#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1131 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandLU_RK2
1134 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1135 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
1140 PURE module subroutine setUnifRecRandLU_RK1(rand, lb, ub)
1141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1142 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifRecRandLU_RK1
1145 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1146 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:)
1153 PURE module subroutine setUnifParRandDU_RK5(rand, ub)
1154#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1155 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandDU_RK5
1158 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1159 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
1164 PURE module subroutine setUnifParRandDU_RK4(rand, ub)
1165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1166 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandDU_RK4
1169 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1170 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
1175 PURE module subroutine setUnifParRandDU_RK3(rand, ub)
1176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1177 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandDU_RK3
1180 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1181 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
1186 PURE module subroutine setUnifParRandDU_RK2(rand, ub)
1187#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1188 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandDU_RK2
1191 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1192 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
1197 PURE module subroutine setUnifParRandDU_RK1(rand, ub)
1198#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1199 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandDU_RK1
1202 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1203 real(RKG) ,
intent(in) ,
contiguous :: ub(:,:)
1210 PURE module subroutine setUnifParRandLU_RK5(rand, lb, ub)
1211#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1212 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandLU_RK5
1215 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1216 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
1221 PURE module subroutine setUnifParRandLU_RK4(rand, lb, ub)
1222#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1223 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandLU_RK4
1226 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1227 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
1232 PURE module subroutine setUnifParRandLU_RK3(rand, lb, ub)
1233#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1234 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandLU_RK3
1237 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1238 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
1243 PURE module subroutine setUnifParRandLU_RK2(rand, lb, ub)
1244#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1245 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandLU_RK2
1248 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1249 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
1254 PURE module subroutine setUnifParRandLU_RK1(rand, lb, ub)
1255#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1256 !DEC$ ATTRIBUTES DLLEXPORT :: setUnifParRandLU_RK1
1259 real(RKG) ,
intent(inout) ,
contiguous :: rand(:)
1260 real(RKG) ,
intent(in) ,
contiguous :: lb(:), ub(:,:)
1270end module pm_distUnifPar
Generate and return the natural logarithm of the Probability Density Function (PDF) of the MultiVaria...
Generate and return a random vector from the -dimensional MultiVariate Uniform Parallelepiped (MVUP) ...
Return a random vector from the -dimensional MultiVariate Uniform Parallelepiped (MVUP) Distribution.
This module contains classes and procedures for setting up and computing the properties of the MultiV...
character(*, SK), parameter MODULE_NAME
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 is the derived type for signifying distributions that are of type MultiVariate Uniform Parallele...