special_functions_gbl::cfp_initds Interface Reference

Public Member Functions
integer function	wp_initds (os, nos, eta)
integer function	ep_initds (os, nos, eta)
	Quad prec version of wp_initds.

Member Function/Subroutine Documentation

ep_initds()

integer function special_functions_gbl::cfp_initds::ep_initds	(	real(kind=ep1), dimension(*)	os,
		integer	nos,
		real	eta )

Quad prec version of wp_initds.

wp_initds()

integer function special_functions_gbl::cfp_initds::wp_initds	(	real(kind=wp), dimension(*)	os,
		integer	nos,
		real	eta )

!>***PURPOSE  Determine the number of terms needed in an orthogonal
!>            polynomial series so that it meets a specified accuracy.
!>***LIBRARY   SLATEC (FNLIB)
!>***CATEGORY  C3A2
!>***TYPE      REAL(kind=wp) (INITS-S, wp_initds-D)
!>***KEYWORDS  CHEBYSHEV, FNLIB, INITIALIZE, ORTHOGONAL POLYNOMIAL,
!>             ORTHOGONAL SERIES, SPECIAL FUNCTIONS
!>***AUTHOR  Fullerton, W., (LANL)
!>***DESCRIPTION
!>
!>  Initialize the orthogonal series, represented by the array OS, so
!>  that wp_initds is the number of terms needed to insure the error is no
!>  larger than ETA.  Ordinarily, ETA will be chosen to be one-tenth
!>  machine precision.
!>
!>             Input Arguments --
!>   OS     REAL(kind=wp) array of NOS coefficients in an orthogonal
!>          series.
!>   NOS    number of coefficients in OS.
!>   ETA    single precision scalar containing requested accuracy of
!>          series.
!>
!>***REFERENCES  (NONE)
!>***ROUTINES CALLED  XERMSG
!>***REVISION HISTORY  (YYMMDD)
!>   770601  DATE WRITTEN
!>   890531  Changed all specific intrinsics to generic.  (WRB)
!>   890831  Modified array declarations.  (WRB)
!>   891115  Modified error message.  (WRB)
!>   891115  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)
!> 

---

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

• /scratch.ssd/codes/ukrmol-in-git/source/gbtolib/source/special_functions.f90