(git:1f285aa)
whittaker.F File Reference

Go to the source code of this file.

Modules

module  whittaker
 Calculates special integrals.
 

Functions/Subroutines

subroutine, public whittaker::whittaker_c0a (wc, r, expa, erfa, alpha, l1, l2, n)
 int(y^(2+l1+l2) * exp(-alpha*y*y),y=0..x) / x^(l2+1); wc(:) :: output r(:) :: coordinate expa(:) :: exp(-alpha*r(:)**2) erfa(:) :: erf(sqrt(alpha)*r(:)) alpha :: exponent l1, l2 :: L-quantum number n :: number of points More...
 
subroutine, public whittaker::whittaker_ci (wc, r, expa, alpha, l, n)
 int(y^(l+1) * exp(-alpha*y*y),y=x..infinity); More...
 

Variables

real(kind=dp), parameter whittaker::epsilon = 1.e-2_dp