cpdsa Subroutine

public subroutine cpdsa(n, z, cdn)

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

! CPDSA computes complex parabolic cylinder function Dn(z) for small argument.

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:

29 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, integer ( kind = 4 ) N, the order.

Input, complex ( kind = 8 ) Z, the argument.

Output, complex ( kind = 8 ) CDN, the value of DN(z).

Arguments

Type IntentOptional Attributes Name
integer(kind=4) :: n
complex(kind=8) :: z
complex(kind=8) :: cdn

Calls

proc~~cpdsa~~CallsGraph proc~cpdsa cpdsa proc~gaih gaih proc~cpdsa->proc~gaih

Called by

proc~~cpdsa~~CalledByGraph proc~cpdsa cpdsa proc~cpbdn cpbdn proc~cpbdn->proc~cpdsa