149 PURE elemental module function getLogBeta_RK5(alpha, beta)
result(logFuncBeta)
150#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
151 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK5
154 real(RKG) ,
intent(in) :: alpha, beta
155 real(RKG) :: logFuncBeta
160 PURE elemental module function getLogBeta_RK4(alpha, beta)
result(logFuncBeta)
161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
162 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK4
165 real(RKG) ,
intent(in) :: alpha, beta
166 real(RKG) :: logFuncBeta
171 PURE elemental module function getLogBeta_RK3(alpha, beta)
result(logFuncBeta)
172#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
173 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK3
176 real(RKG) ,
intent(in) :: alpha, beta
177 real(RKG) :: logFuncBeta
182 PURE elemental module function getLogBeta_RK2(alpha, beta)
result(logFuncBeta)
183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
184 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK2
187 real(RKG) ,
intent(in) :: alpha, beta
188 real(RKG) :: logFuncBeta
193 PURE elemental module function getLogBeta_RK1(alpha, beta)
result(logFuncBeta)
194#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
195 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK1
198 real(RKG) ,
intent(in) :: alpha, beta
199 real(RKG) :: logFuncBeta
285 impure elemental module function getBetaInc_RK5(x, alpha, beta, signed)
result(betaInc)
286#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
287 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK5
291 real(RKG) ,
intent(in) :: x, alpha, beta
292 logical(LK) ,
intent(in) ,
optional :: signed
297 impure elemental module function getBetaInc_RK4(x, alpha, beta, signed)
result(betaInc)
298#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
299 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK4
303 real(RKG) ,
intent(in) :: x, alpha, beta
304 logical(LK) ,
intent(in) ,
optional :: signed
309 impure elemental module function getBetaInc_RK3(x, alpha, beta, signed)
result(betaInc)
310#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
311 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK3
315 real(RKG) ,
intent(in) :: x, alpha, beta
316 logical(LK) ,
intent(in) ,
optional :: signed
321 impure elemental module function getBetaInc_RK2(x, alpha, beta, signed)
result(betaInc)
322#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
323 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK2
327 real(RKG) ,
intent(in) :: x, alpha, beta
328 logical(LK) ,
intent(in) ,
optional :: signed
333 impure elemental module function getBetaInc_RK1(x, alpha, beta, signed)
result(betaInc)
334#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
335 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK1
339 real(RKG) ,
intent(in) :: x, alpha, beta
340 logical(LK) ,
intent(in) ,
optional :: signed
452 PURE elemental module subroutine setBetaIncDef_RK5(betaInc, x, alpha, beta, logFuncBeta, signed, info)
453#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
454 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK5
457 real(RKG) ,
intent(out) :: betaInc
458 real(RKG) ,
intent(in) :: logFuncBeta
459 real(RKG) ,
value :: x, alpha, beta
460 logical(LK) ,
intent(in) :: signed
461 integer(IK) ,
intent(out) :: info
466 PURE elemental module subroutine setBetaIncDef_RK4(betaInc, x, alpha, beta, logFuncBeta, signed, info)
467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
468 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK4
471 real(RKG) ,
intent(out) :: betaInc
472 real(RKG) ,
intent(in) :: logFuncBeta
473 real(RKG) ,
value :: x, alpha, beta
474 logical(LK) ,
intent(in) :: signed
475 integer(IK) ,
intent(out) :: info
480 PURE elemental module subroutine setBetaIncDef_RK3(betaInc, x, alpha, beta, logFuncBeta, signed, info)
481#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
482 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK3
485 real(RKG) ,
intent(out) :: betaInc
486 real(RKG) ,
intent(in) :: logFuncBeta
487 real(RKG) ,
value :: x, alpha, beta
488 logical(LK) ,
intent(in) :: signed
489 integer(IK) ,
intent(out) :: info
494 PURE elemental module subroutine setBetaIncDef_RK2(betaInc, x, alpha, beta, logFuncBeta, signed, info)
495#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
496 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK2
499 real(RKG) ,
intent(out) :: betaInc
500 real(RKG) ,
intent(in) :: logFuncBeta
501 real(RKG) ,
value :: x, alpha, beta
502 logical(LK) ,
intent(in) :: signed
503 integer(IK) ,
intent(out) :: info
508 PURE elemental module subroutine setBetaIncDef_RK1(betaInc, x, alpha, beta, logFuncBeta, signed, info)
509#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
510 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK1
513 real(RKG) ,
intent(out) :: betaInc
514 real(RKG) ,
intent(in) :: logFuncBeta
515 real(RKG) ,
value :: x, alpha, beta
516 logical(LK) ,
intent(in) :: signed
517 integer(IK) ,
intent(out) :: info
524 impure elemental module subroutine setBetaIncGK21_RK5(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
525#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
526 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK5
529 real(RKG) ,
intent(out) :: betaInc
530 real(RKG) ,
intent(in) :: logFuncBeta
531 real(RKG) ,
value :: x, alpha, beta
532 real(RKG) ,
intent(in) :: reltol
533 logical(LK) ,
intent(in) :: signed
534 integer(IK) ,
intent(out) :: info
539 impure elemental module subroutine setBetaIncGK21_RK4(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
540#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
541 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK4
544 real(RKG) ,
intent(out) :: betaInc
545 real(RKG) ,
intent(in) :: logFuncBeta
546 real(RKG) ,
value :: x, alpha, beta
547 real(RKG) ,
intent(in) :: reltol
548 logical(LK) ,
intent(in) :: signed
549 integer(IK) ,
intent(out) :: info
554 impure elemental module subroutine setBetaIncGK21_RK3(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
555#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
556 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK3
559 real(RKG) ,
intent(out) :: betaInc
560 real(RKG) ,
intent(in) :: logFuncBeta
561 real(RKG) ,
value :: x, alpha, beta
562 real(RKG) ,
intent(in) :: reltol
563 logical(LK) ,
intent(in) :: signed
564 integer(IK) ,
intent(out) :: info
569 impure elemental module subroutine setBetaIncGK21_RK2(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
571 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK2
574 real(RKG) ,
intent(out) :: betaInc
575 real(RKG) ,
intent(in) :: logFuncBeta
576 real(RKG) ,
value :: x, alpha, beta
577 real(RKG) ,
intent(in) :: reltol
578 logical(LK) ,
intent(in) :: signed
579 integer(IK) ,
intent(out) :: info
584 impure elemental module subroutine setBetaIncGK21_RK1(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
586 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK1
589 real(RKG) ,
intent(out) :: betaInc
590 real(RKG) ,
intent(in) :: logFuncBeta
591 real(RKG) ,
value :: x, alpha, beta
592 real(RKG) ,
intent(in) :: reltol
593 logical(LK) ,
intent(in) :: signed
594 integer(IK) ,
intent(out) :: info
683 PURE elemental module function getBetaInv_RK5(betaInc, alpha, beta, signed)
result(betaInv)
684#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
685 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK5
689 real(RKG) ,
intent(in) :: betaInc, alpha, beta
690 logical(LK) ,
intent(in) ,
optional :: signed
695 PURE elemental module function getBetaInv_RK4(betaInc, alpha, beta, signed)
result(betaInv)
696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
697 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK4
701 real(RKG) ,
intent(in) :: betaInc, alpha, beta
702 logical(LK) ,
intent(in) ,
optional :: signed
707 PURE elemental module function getBetaInv_RK3(betaInc, alpha, beta, signed)
result(betaInv)
708#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
709 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK3
713 real(RKG) ,
intent(in) :: betaInc, alpha, beta
714 logical(LK) ,
intent(in) ,
optional :: signed
719 PURE elemental module function getBetaInv_RK2(betaInc, alpha, beta, signed)
result(betaInv)
720#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
721 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK2
725 real(RKG) ,
intent(in) :: betaInc, alpha, beta
726 logical(LK) ,
intent(in) ,
optional :: signed
731 PURE elemental module function getBetaInv_RK1(betaInc, alpha, beta, signed)
result(betaInv)
732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
733 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK1
737 real(RKG) ,
intent(in) :: betaInc, alpha, beta
738 logical(LK) ,
intent(in) ,
optional :: signed
832 PURE elemental module subroutine setBetaInv_RK5(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
833#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
834 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK5
837 real(RKG) ,
intent(out) :: betaInv
838 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
839 logical(LK) ,
intent(in) :: signed
840 integer(IK) ,
intent(out) :: info
845 PURE elemental module subroutine setBetaInv_RK4(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
846#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
847 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK4
850 real(RKG) ,
intent(out) :: betaInv
851 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
852 logical(LK) ,
intent(in) :: signed
853 integer(IK) ,
intent(out) :: info
858 PURE elemental module subroutine setBetaInv_RK3(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
859#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
860 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK3
863 real(RKG) ,
intent(out) :: betaInv
864 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
865 logical(LK) ,
intent(in) :: signed
866 integer(IK) ,
intent(out) :: info
871 PURE elemental module subroutine setBetaInv_RK2(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
872#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
873 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK2
876 real(RKG) ,
intent(out) :: betaInv
877 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
878 logical(LK) ,
intent(in) :: signed
879 integer(IK) ,
intent(out) :: info
884 PURE elemental module subroutine setBetaInv_RK1(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
886 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK1
889 real(RKG) ,
intent(out) :: betaInv
890 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
891 logical(LK) ,
intent(in) :: signed
892 integer(IK) ,
intent(out) :: info
902end module pm_mathBeta
Generate and return the regularized Incomplete Beta Function as defined in the details section of pm...
Generate and return the regularized Inverse Incomplete Beta Function as defined in the details secti...
Generate and return the natural logarithm of the Beta Function as defined in the details section of ...
Return the regularized Incomplete Beta Function as defined in the details section of pm_mathBeta.
Return the regularized Inverse Incomplete Beta Function as defined in the details section of pm_math...
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 the mathematical Beta Function and its inve...
character(*, SK), parameter MODULE_NAME