148 PURE elemental module function getLogBeta_RK5(alpha, beta)
result(logFuncBeta)
149#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
150 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK5
153 real(RKG) ,
intent(in) :: alpha, beta
154 real(RKG) :: logFuncBeta
159 PURE elemental module function getLogBeta_RK4(alpha, beta)
result(logFuncBeta)
160#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
161 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK4
164 real(RKG) ,
intent(in) :: alpha, beta
165 real(RKG) :: logFuncBeta
170 PURE elemental module function getLogBeta_RK3(alpha, beta)
result(logFuncBeta)
171#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
172 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK3
175 real(RKG) ,
intent(in) :: alpha, beta
176 real(RKG) :: logFuncBeta
181 PURE elemental module function getLogBeta_RK2(alpha, beta)
result(logFuncBeta)
182#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
183 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK2
186 real(RKG) ,
intent(in) :: alpha, beta
187 real(RKG) :: logFuncBeta
192 PURE elemental module function getLogBeta_RK1(alpha, beta)
result(logFuncBeta)
193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
194 !DEC$ ATTRIBUTES DLLEXPORT :: getLogBeta_RK1
197 real(RKG) ,
intent(in) :: alpha, beta
198 real(RKG) :: logFuncBeta
284 impure elemental module function getBetaInc_RK5(x, alpha, beta, signed)
result(betaInc)
285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
286 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK5
290 real(RKG) ,
intent(in) :: x, alpha, beta
291 logical(LK) ,
intent(in) ,
optional :: signed
296 impure elemental module function getBetaInc_RK4(x, alpha, beta, signed)
result(betaInc)
297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
298 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK4
302 real(RKG) ,
intent(in) :: x, alpha, beta
303 logical(LK) ,
intent(in) ,
optional :: signed
308 impure elemental module function getBetaInc_RK3(x, alpha, beta, signed)
result(betaInc)
309#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
310 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK3
314 real(RKG) ,
intent(in) :: x, alpha, beta
315 logical(LK) ,
intent(in) ,
optional :: signed
320 impure elemental module function getBetaInc_RK2(x, alpha, beta, signed)
result(betaInc)
321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
322 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK2
326 real(RKG) ,
intent(in) :: x, alpha, beta
327 logical(LK) ,
intent(in) ,
optional :: signed
332 impure elemental module function getBetaInc_RK1(x, alpha, beta, signed)
result(betaInc)
333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
334 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInc_RK1
338 real(RKG) ,
intent(in) :: x, alpha, beta
339 logical(LK) ,
intent(in) ,
optional :: signed
451 PURE elemental module subroutine setBetaIncDef_RK5(betaInc, x, alpha, beta, logFuncBeta, signed, info)
452#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
453 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK5
456 real(RKG) ,
intent(out) :: betaInc
457 real(RKG) ,
intent(in) :: logFuncBeta
458 real(RKG) ,
value :: x, alpha, beta
459 logical(LK) ,
intent(in) :: signed
460 integer(IK) ,
intent(out) :: info
465 PURE elemental module subroutine setBetaIncDef_RK4(betaInc, x, alpha, beta, logFuncBeta, signed, info)
466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
467 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK4
470 real(RKG) ,
intent(out) :: betaInc
471 real(RKG) ,
intent(in) :: logFuncBeta
472 real(RKG) ,
value :: x, alpha, beta
473 logical(LK) ,
intent(in) :: signed
474 integer(IK) ,
intent(out) :: info
479 PURE elemental module subroutine setBetaIncDef_RK3(betaInc, x, alpha, beta, logFuncBeta, signed, info)
480#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
481 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK3
484 real(RKG) ,
intent(out) :: betaInc
485 real(RKG) ,
intent(in) :: logFuncBeta
486 real(RKG) ,
value :: x, alpha, beta
487 logical(LK) ,
intent(in) :: signed
488 integer(IK) ,
intent(out) :: info
493 PURE elemental module subroutine setBetaIncDef_RK2(betaInc, x, alpha, beta, logFuncBeta, signed, info)
494#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
495 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK2
498 real(RKG) ,
intent(out) :: betaInc
499 real(RKG) ,
intent(in) :: logFuncBeta
500 real(RKG) ,
value :: x, alpha, beta
501 logical(LK) ,
intent(in) :: signed
502 integer(IK) ,
intent(out) :: info
507 PURE elemental module subroutine setBetaIncDef_RK1(betaInc, x, alpha, beta, logFuncBeta, signed, info)
508#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
509 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncDef_RK1
512 real(RKG) ,
intent(out) :: betaInc
513 real(RKG) ,
intent(in) :: logFuncBeta
514 real(RKG) ,
value :: x, alpha, beta
515 logical(LK) ,
intent(in) :: signed
516 integer(IK) ,
intent(out) :: info
523 impure elemental module subroutine setBetaIncGK21_RK5(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
524#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
525 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK5
528 real(RKG) ,
intent(out) :: betaInc
529 real(RKG) ,
intent(in) :: logFuncBeta
530 real(RKG) ,
value :: x, alpha, beta
531 real(RKG) ,
intent(in) :: reltol
532 logical(LK) ,
intent(in) :: signed
533 integer(IK) ,
intent(out) :: info
538 impure elemental module subroutine setBetaIncGK21_RK4(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
539#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
540 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK4
543 real(RKG) ,
intent(out) :: betaInc
544 real(RKG) ,
intent(in) :: logFuncBeta
545 real(RKG) ,
value :: x, alpha, beta
546 real(RKG) ,
intent(in) :: reltol
547 logical(LK) ,
intent(in) :: signed
548 integer(IK) ,
intent(out) :: info
553 impure elemental module subroutine setBetaIncGK21_RK3(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
554#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
555 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK3
558 real(RKG) ,
intent(out) :: betaInc
559 real(RKG) ,
intent(in) :: logFuncBeta
560 real(RKG) ,
value :: x, alpha, beta
561 real(RKG) ,
intent(in) :: reltol
562 logical(LK) ,
intent(in) :: signed
563 integer(IK) ,
intent(out) :: info
568 impure elemental module subroutine setBetaIncGK21_RK2(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
569#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
570 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK2
573 real(RKG) ,
intent(out) :: betaInc
574 real(RKG) ,
intent(in) :: logFuncBeta
575 real(RKG) ,
value :: x, alpha, beta
576 real(RKG) ,
intent(in) :: reltol
577 logical(LK) ,
intent(in) :: signed
578 integer(IK) ,
intent(out) :: info
583 impure elemental module subroutine setBetaIncGK21_RK1(betaInc, x, alpha, beta, logFuncBeta, reltol, signed, info)
584#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
585 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaIncGK21_RK1
588 real(RKG) ,
intent(out) :: betaInc
589 real(RKG) ,
intent(in) :: logFuncBeta
590 real(RKG) ,
value :: x, alpha, beta
591 real(RKG) ,
intent(in) :: reltol
592 logical(LK) ,
intent(in) :: signed
593 integer(IK) ,
intent(out) :: info
682 PURE elemental module function getBetaInv_RK5(betaInc, alpha, beta, signed)
result(betaInv)
683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
684 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK5
688 real(RKG) ,
intent(in) :: betaInc, alpha, beta
689 logical(LK) ,
intent(in) ,
optional :: signed
694 PURE elemental module function getBetaInv_RK4(betaInc, alpha, beta, signed)
result(betaInv)
695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
696 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK4
700 real(RKG) ,
intent(in) :: betaInc, alpha, beta
701 logical(LK) ,
intent(in) ,
optional :: signed
706 PURE elemental module function getBetaInv_RK3(betaInc, alpha, beta, signed)
result(betaInv)
707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
708 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK3
712 real(RKG) ,
intent(in) :: betaInc, alpha, beta
713 logical(LK) ,
intent(in) ,
optional :: signed
718 PURE elemental module function getBetaInv_RK2(betaInc, alpha, beta, signed)
result(betaInv)
719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
720 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK2
724 real(RKG) ,
intent(in) :: betaInc, alpha, beta
725 logical(LK) ,
intent(in) ,
optional :: signed
730 PURE elemental module function getBetaInv_RK1(betaInc, alpha, beta, signed)
result(betaInv)
731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
732 !DEC$ ATTRIBUTES DLLEXPORT :: getBetaInv_RK1
736 real(RKG) ,
intent(in) :: betaInc, alpha, beta
737 logical(LK) ,
intent(in) ,
optional :: signed
831 PURE elemental module subroutine setBetaInv_RK5(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
832#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
833 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK5
836 real(RKG) ,
intent(out) :: betaInv
837 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
838 logical(LK) ,
intent(in) :: signed
839 integer(IK) ,
intent(out) :: info
844 PURE elemental module subroutine setBetaInv_RK4(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
846 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK4
849 real(RKG) ,
intent(out) :: betaInv
850 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
851 logical(LK) ,
intent(in) :: signed
852 integer(IK) ,
intent(out) :: info
857 PURE elemental module subroutine setBetaInv_RK3(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
858#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
859 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK3
862 real(RKG) ,
intent(out) :: betaInv
863 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
864 logical(LK) ,
intent(in) :: signed
865 integer(IK) ,
intent(out) :: info
870 PURE elemental module subroutine setBetaInv_RK2(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
872 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK2
875 real(RKG) ,
intent(out) :: betaInv
876 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
877 logical(LK) ,
intent(in) :: signed
878 integer(IK) ,
intent(out) :: info
883 PURE elemental module subroutine setBetaInv_RK1(betaInv, betaInc, alpha, beta, logFuncBeta, signed, info)
884#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
885 !DEC$ ATTRIBUTES DLLEXPORT :: setBetaInv_RK1
888 real(RKG) ,
intent(out) :: betaInv
889 real(RKG) ,
value :: betaInc, alpha, beta, logFuncBeta
890 logical(LK) ,
intent(in) :: signed
891 integer(IK) ,
intent(out) :: info
901end 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