This function evaluates the exponentially scaled modified Bessel function of the second kind of order zero.

Function Return Value

BSK0E — Function value.   (Output)

Required Arguments

X — Argument for which the function value is desired.   (Input)

FORTRAN 90 Interface

Generic:                              BSK0E (X)

Specific:                             The specific interface names are S_BSK0E and D_BSK0E.

FORTRAN 77 Interface

Single:                                BSK0E (X)

Double:                              The double precision function name is DBSK0E.

Description

Function BSK0E computes exK0(x). For the definition of the Bessel function K0(x), see BSK0. The argument must be greater than zero for the result to be defined.

Example

In this example, BSK0E(0.5) is computed and printed.

 

      USE BSK0E_INT

      USE UMACH_INT

 

      IMPLICIT   NONE

!                                 Declare variables

      INTEGER    NOUT

      REAL       VALUE, X

!                                 Compute

      X     = 0.5

      VALUE = BSK0E(X)

!                                 Print the results

      CALL UMACH (2, NOUT)

      WRITE (NOUT,99999) X, VALUE

99999 FORMAT (' BSK0E(', F6.3, ') = ', F6.3)

      END

Output

 

BSK0E( 0.500) =  1.524

http://www.vni.com/ PHONE: 713.784.3131 FAX:713.781.9260