simps Interface

experimental
38 statements
Source File

public interface simps

Integrates sampled values using Simpson's rule (Specification)

Contents

Functions

simps_dx_dp simps_dx_qp simps_dx_sp simps_x_dp simps_x_qp simps_x_sp

Functions

public pure recursive function simps_dx_dp(y, dx, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(:)	::	y
real(kind=dp),	intent(in)			::	dx
integer,	intent(in),	optional		::	even

Return Value real(kind=dp)

public pure recursive function simps_dx_qp(y, dx, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=qp),	intent(in),		dimension(:)	::	y
real(kind=qp),	intent(in)			::	dx
integer,	intent(in),	optional		::	even

Return Value real(kind=qp)

public pure recursive function simps_dx_sp(y, dx, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in),		dimension(:)	::	y
real(kind=sp),	intent(in)			::	dx
integer,	intent(in),	optional		::	even

Return Value real(kind=sp)

public recursive function simps_x_dp(y, x, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(:)	::	y
real(kind=dp),	intent(in),		dimension(:)	::	x
integer,	intent(in),	optional		::	even

Return Value real(kind=dp)

public recursive function simps_x_qp(y, x, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=qp),	intent(in),		dimension(:)	::	y
real(kind=qp),	intent(in),		dimension(:)	::	x
integer,	intent(in),	optional		::	even

Return Value real(kind=qp)

public recursive function simps_x_sp(y, x, even) result(integral)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in),		dimension(:)	::	y
real(kind=sp),	intent(in),		dimension(:)	::	x
integer,	intent(in),	optional		::	even

Return Value real(kind=sp)