Go to the source code of this file.
|
module | whittaker |
| Calculates special integrals.
|
|
|
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...
|
|