C331: Conical Functions of the First Kind

Author(s): K.S. Kölbig Library: MATHLIB
Submitter: Submitted: 15.02.1989
Language: Fortran Revised: 01.12.1994

Function subprograms RFCONC and DFCONC calculate the (real valued) conical function of the first kind

displaymath141

for real tex2html_wrap_inline143 , and m=0,1, where tex2html_wrap_inline147 is the Legendre (or spherical) function of the first kind and tex2html_wrap_inline149 .

On CDC and Cray computers, the double-precision version DFCONC is not available.

Structure:

FUNCTION subprograms
User Entry Names: RFCONC, DFCONC
Obsolete User Entry Names: FCONC tex2html_wrap_inline151 RFCONC
Files Referenced: Unit 6
External References:
CGAMMA, WGAMMA, CLGAMA, WLGAMA,
BESJO, DBESJ0, BESJ1, DBESJ1,
BESIO, DBESI0, BESI1, DBESI1,
RELIKC, DELIKC, RELIEC, DELIEC,
MTLMTR, ABEND

Usage:

For tex2html_wrap_inline153 (type REAL), tex2html_wrap_inline155 (type DOUBLE PRECISION),

    tFCONC(X,TAU,M)}
has, in any arithmetic expression, the value tex2html_wrap_inline157 .
X
(type according to t) Variable x.
TAU
(type according to t) The imaginary part of the index, tex2html_wrap_inline161 .
M
(INTEGER) Order m. ( tex2html_wrap_inline165 or tex2html_wrap_inline167 .

Method:

Either (i) series expansions based on the Gaussian hypergeometric function and evaluated by direct summation or from rational approximations, or (ii) asymptotic expressions in terms of Bessel functions. For tex2html_wrap_inline169 the conical functions (for m = 0,1) can be expressed in terms of complete elliptic integrals. For details see Ref. 1.

Restrictions:

tex2html_wrap_inline173 , tex2html_wrap_inline175 , tex2html_wrap_inline177 or 1.

Accuracy:

RFCONC (except on CDC and Cray computers) has full single-precision accuracy. For most values of the argument X, DFCONC (and RFCONC on CDC and Cray computers), an accuracy of not less than 10 significant digits is usually obtained. If x and tex2html_wrap_inline181 are not too large the accuracy increases to about 12-13 significant digits.

Error handling:

Error C331.1: tex2html_wrap_inline183 or tex2html_wrap_inline185 or tex2html_wrap_inline187 and tex2html_wrap_inline189 .
Error C331.2: Problems of convergence for a hypergeometric function.
In both cases, the function value is set equal to zero, and a message is written on Unit 6, unless subroutine MTLSET (N002) has been called.

Notes:

This program is an (only formally) modified version of the CPC Program Library Package FCONIC (see Ref. 1).

References:

  1. K.S. Kölbig, A program for computing the conical functions of the first kind tex2html_wrap_inline191 for m=0 and m=1, Computer Phys. Comm. 23 (1981) 51-61.
  2. M.I. Zhurina and L.N. Karmazina, Tables and formulae for the spherical functions tex2html_wrap_inline197 , (Pergamon Press, Oxford 1966).
tex2html_wrap_inline199

Michel Goossens Tue Jun 4 22:11:40 METDST 1996