D9KNUS(3)

SYNOPSIS
SUBROUTINE D9KNUS (XNU, X, BKNU, BKNU1, ISWTCH)

NAME
d9knus - Compute Bessel functions EXP(X)*K-SUB-XNU(X) and EXP(X)* K-SUB-XNU+1(X) for 0.0 .LE. XNU .LT. 1.0.

LIBRARY
SLATEC (FNLIB)

CATEGORY
C10B3

TYPE
DOUBLE PRECISION (R9KNUS-S, D9KNUS-D)

KEYWORDS
BESSEL FUNCTION, FNLIB, SPECIAL FUNCTIONS

AUTHOR
Fullerton, W., (LANL)

DESCRIPTION
Compute Bessel functions EXP(X) * K-sub-XNU (X) and EXP(X) * K-sub-XNU+1 (X) for 0.0 .LE. XNU .LT. 1.0 . Series for C0K on the interval 0. to 2.50000E-01 with weighted error 2.16E-32 log weighted error 31.67 significant figures required 30.86 decimal places required 32.40 Series for ZNU1 on the interval -7.00000E-01 to 0. with weighted error 2.45E-33 log weighted error 32.61 significant figures required 31.85 decimal places required 33.26

REFERENCES
(NONE)

ROUTINES CALLED
D1MACH, DCSEVL, DGAMMA, INITDS, XERMSG

REVISION HISTORY (YYMMDD)
770601 DATE WRITTEN
890531 Changed all specific intrinsics to generic. (WRB)
890911 Removed unnecessary intrinsics. (WRB)
890911 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)
900315 CALLs to XERROR changed to CALLs to XERMSG. (THJ)
900720 Routine changed from user-callable to subsidiary. (WRB)
900727 Added EXTERNAL statement. (WRB)
920618 Removed space from variable names. (RWC, WRB)