unarySlopeRatio Interface

interface
public pure module function unarySlopeRatio(input, realParams, intParams, logicalParams) result(output)

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in), dimension(:) :: input
real(kind=rk), intent(in), optional, dimension(:) :: realParams
integer(kind=ik), intent(in), optional, dimension(:) :: intParams
logical, intent(in), optional, dimension(:) :: logicalParams

Return Value real(kind=rk),allocatable,dimension(:)

Description

Unary wrapper calculating r_i = (u_i - u_{i-n})/(u_{i+n}-u_i) where n is intParams[1]. If the absolute value of the denominator is less than realParams[1], the result will be realParams[2] (with the appropriate sign) if the numerator is not less than realParams[1], and 1 otherwise