itth0 Subroutine

public subroutine itth0(x, Tth)

Evaluate the integral H0(t)/t with respect to t from x to infinity

Arguments

Type IntentOptional Attributes Name
real(kind=wp) :: x
real(kind=wp) :: Tth