chgubi Subroutine

public subroutine chgubi(a, b, x, hu, id)

************80

! CHGUBI: confluent hypergeometric function with integer argument B.

Discussion:

This procedure computes the confluent hypergeometric function
U(a,b,x) with integer ( kind = 4 ) b ( b = ±1,±2,... )

Licensing:

This routine is copyrighted by Shanjie Zhang and Jianming Jin.  However, 
they give permission to incorporate this routine into a user program 
provided that the copyright is acknowledged.

Modified:

31 July 2012

Author:

Shanjie Zhang, Jianming Jin

Reference:

Shanjie Zhang, Jianming Jin,
Computation of Special Functions,
Wiley, 1996,
ISBN: 0-471-11963-6,
LC: QA351.C45.

Parameters:

Input, real ( kind = 8 ) A, B, parameters.

Input, real ( kind = 8 ) X, the argument.

Output, real ( kind = 8 ) HU, the value of U(a,b,x).

Output, integer ( kind = 4 ) ID, the estimated number of significant
digits.

Arguments

Type IntentOptional Attributes Name
real(kind=8) :: a
real(kind=8) :: b
real(kind=8) :: x
real(kind=8) :: hu
integer(kind=4) :: id

Calls

proc~~chgubi~~CallsGraph proc~chgubi chgubi proc~gammaf gammaf proc~chgubi->proc~gammaf proc~psi psi proc~chgubi->proc~psi

Called by

proc~~chgubi~~CalledByGraph proc~chgubi chgubi proc~chgu chgu proc~chgu->proc~chgubi