mod_integration Module

Uses

- iso_fortran_env
- lib_array
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

- Descendants:
- smod_integration
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Interfaces

integrate fun2d_interf fun1d_interf gaussquad

Functions

integrate1D integrate2D

Interfaces

public interface integrate

private function integrate1D(fun, xbnds) result(result)

Arguments

Type Intent Optional Attributes Name

procedure(fun1d_interf) :: fun

real(kind=wp), intent(in) :: xbnds(2)

Return Value real(kind=wp)

private function integrate2D(fun, xbnds, ybnds) result(out)

Arguments

Type	Intent	Optional	Attributes		Name
procedure(fun2d_interf)				::	fun
real(kind=wp),	intent(in)			::	xbnds(2)
real(kind=wp),	intent(in)			::	ybnds(2)

Return Value real(kind=wp)

interface

private function fun2d_interf(x, y) result(z)

Arguments

Type Intent Optional Attributes Name

real(kind=wp), intent(in) :: x(:,:)

real(kind=wp), intent(in) :: y(:,:)

Return Value real(kind=wp), allocatable, (:,:)

interface

private function fun1d_interf(xx) result(yy)

Arguments

Type Intent Optional Attributes Name

real(kind=wp), intent(in) :: xx(:)

Return Value real(kind=wp), allocatable, (:)

interface

private module subroutine gaussquad(N, x, w)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	N
real(kind=wp),	intent(out)			::	x(N)
real(kind=wp),	intent(out)			::	w(N)

Functions

private function integrate1D(fun, xbnds) result(result)

Arguments

Type	Intent	Optional	Attributes		Name
procedure(fun1d_interf)				::	fun
real(kind=wp),	intent(in)			::	xbnds(2)

Return Value real(kind=wp)

private function integrate2D(fun, xbnds, ybnds) result(out)

Arguments

Type	Intent	Optional	Attributes		Name
procedure(fun2d_interf)				::	fun
real(kind=wp),	intent(in)			::	xbnds(2)
real(kind=wp),	intent(in)			::	ybnds(2)

Return Value real(kind=wp)