dftint Interface

interface
public subroutine dftint(func, a, b, w, cosint, sinint)

Arguments

Type	Intent	Optional	Attributes		Name
function func(x) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), DIMENSION(:) :: x Return Value real(kind=SP), DIMENSION(size(x))
real(kind=SP),	intent(in)			::	a
real(kind=SP),	intent(in)			::	b
real(kind=SP),	intent(in)			::	w
real(kind=SP),	intent(out)			::	cosint
real(kind=SP),	intent(out)			::	sinint