simps2d Interface

public interface simps2d

Module Procedures

private function d_simps2d_func(func, xrange, yrange, Nx, Ny) result(int)

Arguments

Type IntentOptional Attributes Name
private function func(x)
Arguments
Type IntentOptional Attributes Name
real(kind=8), dimension(:) :: x
Return Value real(kind=8)
real(kind=8), dimension(2) :: xrange
real(kind=8), dimension(2) :: yrange
integer :: Nx
integer :: Ny

Return Value real(kind=8)

private function c_simps2d_func(func, xrange, yrange, Nx, Ny) result(int)

Arguments

Type IntentOptional Attributes Name
private function func(x)
Arguments
Type IntentOptional Attributes Name
real(kind=8), dimension(:) :: x
Return Value complex(kind=8)
real(kind=8), dimension(2) :: xrange
real(kind=8), dimension(2) :: yrange
integer :: Nx
integer :: Ny

Return Value complex(kind=8)

private function d_simps2d_func_recursive(func, xrange, yrange, N0, iterative, threshold) result(int)

Arguments

Type IntentOptional Attributes Name
private function func(x)
Arguments
Type IntentOptional Attributes Name
real(kind=8), dimension(:) :: x
Return Value real(kind=8)
real(kind=8), dimension(2) :: xrange
real(kind=8), dimension(2) :: yrange
integer, optional :: N0
logical, optional :: iterative
real(kind=8), optional :: threshold

Return Value real(kind=8)

private function c_simps2d_func_recursive(func, xrange, yrange, N0, iterative, threshold) result(int)

Arguments

Type IntentOptional Attributes Name
private function func(x)
Arguments
Type IntentOptional Attributes Name
real(kind=8), dimension(:) :: x
Return Value complex(kind=8)
real(kind=8), dimension(2) :: xrange
real(kind=8), dimension(2) :: yrange
integer, optional :: N0
logical, optional :: iterative
real(kind=8), optional :: threshold

Return Value complex(kind=8)

private function d_simps2d_sample(func, dhx, dhy, xrange, yrange) result(int)

Arguments

Type IntentOptional Attributes Name
real(kind=8), dimension(:,:) :: func
real(kind=8), optional :: dhx
real(kind=8), optional :: dhy
real(kind=8), optional, dimension(2) :: xrange
real(kind=8), optional, dimension(2) :: yrange

Return Value real(kind=8)

private function c_simps2d_sample(func, dhx, dhy, xrange, yrange) result(int)

Arguments

Type IntentOptional Attributes Name
complex(kind=8), dimension(:,:) :: func
real(kind=8), optional :: dhx
real(kind=8), optional :: dhy
real(kind=8), optional, dimension(2) :: xrange
real(kind=8), optional, dimension(2) :: yrange

Return Value complex(kind=8)