GBTOlib: library for evaluation of molecular integrals in mixed Gaussian / B-spline basis  111
Public Member Functions | List of all members
special_functions_gbl::cfp_jairy Interface Reference

Public Member Functions

subroutine wp_jairy (X, RX, C, AI, DAI)
 
subroutine ep_jairy (X, RX, C, AI, DAI)
 Quad precision version of wp_jairy. More...
 

Detailed Description

Warning
Quad precision version not implemented yet.

Member Function/Subroutine Documentation

◆ ep_jairy()

subroutine special_functions_gbl::cfp_jairy::ep_jairy ( real(kind=ep1)  X,
real(kind=ep1)  RX,
real(kind=ep1)  C,
real(kind=ep1)  AI,
real(kind=ep1)  DAI 
)

Quad precision version of wp_jairy.

Warning
Not implemented yet.

◆ wp_jairy()

subroutine special_functions_gbl::cfp_jairy::wp_jairy ( real(kind=wp)  X,
real(kind=wp)  RX,
real(kind=wp)  C,
real(kind=wp)  AI,
real(kind=wp)  DAI 
)
***SUBSIDIARY
***PURPOSE  Subsidiary to cfp_besj and DBESY
***LIBRARY   SLATEC
***TYPE      REAL(kind=wp) (JAIRY-S, wp_jairy-D)
***AUTHOR  Amos, D. E., (SNLA)
           Daniel, S. L., (SNLA)
           Weston, M. K., (SNLA)
***DESCRIPTION

                  wp_jairy computes the Airy function AI(X)
                   and its derivative DAI(X) for wp_asyjy

                                   INPUT

         X - Argument, computed by wp_asyjy, X unrestricted
        RX - RX=SQRT(ABS(X)), computed by wp_asyjy
         C - C=2.*(ABS(X)**1.5)/3., computed by wp_asyjy

                                  OUTPUT

        AI - Value of function AI(X)
       DAI - Value of the derivative DAI(X)

***SEE ALSO  cfp_besj, DBESY
***ROUTINES CALLED  (NONE)
***REVISION HISTORY  (YYMMDD)
   750101  DATE WRITTEN
   890531  Changed all specific intrinsics to generic.  (WRB)
   891009  Removed unreferenced variable.  (WRB)
   891214  Prologue converted to Version 4.0 format.  (BAB)
   900328  Added TYPE section.  (WRB)
   910408  Updated the AUTHOR section.  (WRB)
Here is the call graph for this function:

The documentation for this interface was generated from the following file: