147 impure elemental module function getGammaIncLowAM_RK5(x, kappa)
result(gammaIncLow)
148#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
149 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncLowAM_RK5
152 real(RKG) ,
intent(in) :: x, kappa
153 real(RKG) :: gammaIncLow
158 impure elemental module function getGammaIncLowAM_RK4(x, kappa)
result(gammaIncLow)
159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
160 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncLowAM_RK4
163 real(RKG) ,
intent(in) :: x, kappa
164 real(RKG) :: gammaIncLow
169 impure elemental module function getGammaIncLowAM_RK3(x, kappa)
result(gammaIncLow)
170#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
171 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncLowAM_RK3
174 real(RKG) ,
intent(in) :: x, kappa
175 real(RKG) :: gammaIncLow
180 impure elemental module function getGammaIncLowAM_RK2(x, kappa)
result(gammaIncLow)
181#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
182 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncLowAM_RK2
185 real(RKG) ,
intent(in) :: x, kappa
186 real(RKG) :: gammaIncLow
191 impure elemental module function getGammaIncLowAM_RK1(x, kappa)
result(gammaIncLow)
192#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
193 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncLowAM_RK1
196 real(RKG) ,
intent(in) :: x, kappa
197 real(RKG) :: gammaIncLow
284 impure elemental module function getGammaIncUppAM_RK5(x, kappa)
result(gammaIncUpp)
285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
286 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncUppAM_RK5
289 real(RKG) ,
intent(in) :: x, kappa
290 real(RKG) :: gammaIncUpp
295 impure elemental module function getGammaIncUppAM_RK4(x, kappa)
result(gammaIncUpp)
296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
297 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncUppAM_RK4
300 real(RKG) ,
intent(in) :: x, kappa
301 real(RKG) :: gammaIncUpp
306 impure elemental module function getGammaIncUppAM_RK3(x, kappa)
result(gammaIncUpp)
307#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
308 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncUppAM_RK3
311 real(RKG) ,
intent(in) :: x, kappa
312 real(RKG) :: gammaIncUpp
317 impure elemental module function getGammaIncUppAM_RK2(x, kappa)
result(gammaIncUpp)
318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
319 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncUppAM_RK2
322 real(RKG) ,
intent(in) :: x, kappa
323 real(RKG) :: gammaIncUpp
328 impure elemental module function getGammaIncUppAM_RK1(x, kappa)
result(gammaIncUpp)
329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
330 !DEC$ ATTRIBUTES DLLEXPORT :: getGammaIncUppAM_RK1
333 real(RKG) ,
intent(in) :: x, kappa
334 real(RKG) :: gammaIncUpp
421 PURE elemental module subroutine setGammaIncLowAM_RK5(gammaIncLow, x, logGammaKappa, kappa, info)
422#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
423 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncLowAM_RK5
426 real(RKG) ,
intent(out) :: gammaIncLow
427 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
428 integer(IK) ,
intent(out) :: info
433 PURE elemental module subroutine setGammaIncLowAM_RK4(gammaIncLow, x, logGammaKappa, kappa, info)
434#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
435 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncLowAM_RK4
438 real(RKG) ,
intent(out) :: gammaIncLow
439 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
440 integer(IK) ,
intent(out) :: info
445 PURE elemental module subroutine setGammaIncLowAM_RK3(gammaIncLow, x, logGammaKappa, kappa, info)
446#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
447 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncLowAM_RK3
450 real(RKG) ,
intent(out) :: gammaIncLow
451 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
452 integer(IK) ,
intent(out) :: info
457 PURE elemental module subroutine setGammaIncLowAM_RK2(gammaIncLow, x, logGammaKappa, kappa, info)
458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
459 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncLowAM_RK2
462 real(RKG) ,
intent(out) :: gammaIncLow
463 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
464 integer(IK) ,
intent(out) :: info
469 PURE elemental module subroutine setGammaIncLowAM_RK1(gammaIncLow, x, logGammaKappa, kappa, info)
470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
471 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncLowAM_RK1
474 real(RKG) ,
intent(out) :: gammaIncLow
475 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
476 integer(IK) ,
intent(out) :: info
569 PURE elemental module subroutine setGammaIncUppAM_RK5(gammaIncUpp, x, logGammaKappa, kappa, info)
570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
571 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncUppAM_RK5
574 real(RKG) ,
intent(out) :: gammaIncUpp
575 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
576 integer(IK) ,
intent(out) :: info
581 PURE elemental module subroutine setGammaIncUppAM_RK4(gammaIncUpp, x, logGammaKappa, kappa, info)
582#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
583 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncUppAM_RK4
586 real(RKG) ,
intent(out) :: gammaIncUpp
587 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
588 integer(IK) ,
intent(out) :: info
593 PURE elemental module subroutine setGammaIncUppAM_RK3(gammaIncUpp, x, logGammaKappa, kappa, info)
594#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
595 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncUppAM_RK3
598 real(RKG) ,
intent(out) :: gammaIncUpp
599 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
600 integer(IK) ,
intent(out) :: info
605 PURE elemental module subroutine setGammaIncUppAM_RK2(gammaIncUpp, x, logGammaKappa, kappa, info)
606#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
607 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncUppAM_RK2
610 real(RKG) ,
intent(out) :: gammaIncUpp
611 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
612 integer(IK) ,
intent(out) :: info
617 PURE elemental module subroutine setGammaIncUppAM_RK1(gammaIncUpp, x, logGammaKappa, kappa, info)
618#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
619 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncUppAM_RK1
622 real(RKG) ,
intent(out) :: gammaIncUpp
623 real(RKG) ,
intent(in) :: x, logGammaKappa, kappa
624 integer(IK) ,
intent(out) :: info
638 interface setGammaIncAM
643 PURE elemental module subroutine setGammaIncAMDef_RK5(gammaInc, x, kappa, info)
644#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
645 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMDef_RK5
648 real(RKG) ,
intent(out) :: gammaInc
649 real(RKG) ,
intent(in) :: x, kappa
650 integer(IK) ,
intent(out) :: info
655 PURE elemental module subroutine setGammaIncAMDef_RK4(gammaInc, x, kappa, info)
656#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
657 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMDef_RK4
660 real(RKG) ,
intent(out) :: gammaInc
661 real(RKG) ,
intent(in) :: x, kappa
662 integer(IK) ,
intent(out) :: info
667 PURE elemental module subroutine setGammaIncAMDef_RK3(gammaInc, x, kappa, info)
668#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
669 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMDef_RK3
672 real(RKG) ,
intent(out) :: gammaInc
673 real(RKG) ,
intent(in) :: x, kappa
674 integer(IK) ,
intent(out) :: info
679 PURE elemental module subroutine setGammaIncAMDef_RK2(gammaInc, x, kappa, info)
680#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
681 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMDef_RK2
684 real(RKG) ,
intent(out) :: gammaInc
685 real(RKG) ,
intent(in) :: x, kappa
686 integer(IK) ,
intent(out) :: info
691 PURE elemental module subroutine setGammaIncAMDef_RK1(gammaInc, x, kappa, info)
692#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
693 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMDef_RK1
696 real(RKG) ,
intent(out) :: gammaInc
697 real(RKG) ,
intent(in) :: x, kappa
698 integer(IK) ,
intent(out) :: info
705 PURE elemental module subroutine setGammaIncAMNXIK_RK5(gammaInc, x, logGammaKappa, kappa, info)
706#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
707 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMNXIK_RK5
710 real(RKG) ,
intent(out) :: gammaInc
711 real(RKG) ,
intent(in) :: x, logGammaKappa
712 integer(IK) ,
intent(in) :: kappa
713 integer(IK) ,
intent(out) :: info
718 PURE elemental module subroutine setGammaIncAMNXIK_RK4(gammaInc, x, logGammaKappa, kappa, info)
719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
720 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMNXIK_RK4
723 real(RKG) ,
intent(out) :: gammaInc
724 real(RKG) ,
intent(in) :: x, logGammaKappa
725 integer(IK) ,
intent(in) :: kappa
726 integer(IK) ,
intent(out) :: info
731 PURE elemental module subroutine setGammaIncAMNXIK_RK3(gammaInc, x, logGammaKappa, kappa, info)
732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
733 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMNXIK_RK3
736 real(RKG) ,
intent(out) :: gammaInc
737 real(RKG) ,
intent(in) :: x, logGammaKappa
738 integer(IK) ,
intent(in) :: kappa
739 integer(IK) ,
intent(out) :: info
744 PURE elemental module subroutine setGammaIncAMNXIK_RK2(gammaInc, x, logGammaKappa, kappa, info)
745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
746 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMNXIK_RK2
749 real(RKG) ,
intent(out) :: gammaInc
750 real(RKG) ,
intent(in) :: x, logGammaKappa
751 integer(IK) ,
intent(in) :: kappa
752 integer(IK) ,
intent(out) :: info
757 PURE elemental module subroutine setGammaIncAMNXIK_RK1(gammaInc, x, logGammaKappa, kappa, info)
758#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
759 !DEC$ ATTRIBUTES DLLEXPORT :: setGammaIncAMNXIK_RK1
762 real(RKG) ,
intent(out) :: gammaInc
763 real(RKG) ,
intent(in) :: x, logGammaKappa
764 integer(IK) ,
intent(in) :: kappa
765 integer(IK) ,
intent(out) :: info
Generate and return the regularized Lower Incomplete Gamma function for the specified shape parameter...
Generate and return the regularized Upper Incomplete Gamma function for the specified shape parameter...
Return the regularized Lower Incomplete Gamma function for the specified shape parameter ( ) and uppe...
Return the regularized Upper Incomplete Gamma function for the specified shape parameter ( ) and lowe...
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 procedures and generic interfaces for the Lower and Upper Incomplete Gamma funct...
character(*, SK), parameter MODULE_NAME