cpc_michel Module

CPC Michel

CPC Algorithm AEAE_v1_0.

Procedures:

  • hyp_2f1: Gauss hypergeometric function

Author

N. Michel

History

  • 2007-12-17 - N. Michel
    • Original code.
  • 2008-04-01 - N. Michel
  • 2025-07-12 - Rodrigo Castro (GitHub: rodpcastro)
    • Placed all procedures in the module cpc_michel and removed references to the old module HYP_2F1_MODULE.
    • Removed unnecessary declarations of function type.
    • Positioned original docstrings inside their respective procedures.
    • Replaced PR (real and complex precision) by wp (CSF working precision).
    • Replaced IPR (integer precision) by i4 (CSF 4-byte integer).
  • 2025-07-14 - Rodrigo Castro (GitHub: rodpcastro)
    • Replaced EPS15 by eps_wp (CSF working precision machine epsilon).

References

  1. N. Michel and M. V. Stoitsov. 2008. Fast computation of the Gauss hypergeometric function with all its parameters complex with application to the Pöschl-Teller- Ginocchio potential wave functions. Computer Physics Communications 178, 7 (April 2008), 535–551. https://doi.org/10.1016/J.CPC.2007.11.007

Uses

  • module~~cpc_michel~~UsesGraph module~cpc_michel cpc_michel module~csf_kinds csf_kinds module~cpc_michel->module~csf_kinds module~csf_numerror csf_numerror module~cpc_michel->module~csf_numerror iso_fortran_env iso_fortran_env module~csf_kinds->iso_fortran_env module~csf_numerror->module~csf_kinds

Used by

  • module~~cpc_michel~~UsedByGraph module~cpc_michel cpc_michel module~csf_hypergeometric csf_hypergeometric module~csf_hypergeometric->module~cpc_michel module~csf csf module~csf->module~csf_hypergeometric

Functions

public recursive function HYP_2F1(A, B, C, Z) result(RES)

CPC Michel Gauss hypergeometric function .

Arguments

Type IntentOptional Attributes Name
complex(kind=wp), intent(in) :: A
complex(kind=wp), intent(in) :: B
complex(kind=wp), intent(in) :: C
complex(kind=wp), intent(in) :: Z

Return Value complex(kind=wp)