unaryExpand Interface

interface
public pure module function unaryExpand(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 expanding an array with another array. String name "expand". Uses realParams as the expanding array. After expansion it uses intParams(1) to determine how many times the result should be copied. The result is output((i-1)size(input)size(realParams)+(j-1)size(realParams)+k) = input(j)realParams(k) where j=1,size(input) and i=1,intParams(1)