pushnew Interface

public interface pushnew

returns a new vector adding val to the input vector but only if val is not already in the input vector.


Contents


Module Procedures

private pure function pushnew_i1(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=i1), intent(in), dimension(:), allocatable:: vec
integer(kind=i1), intent(in) :: val

Return Value integer(kind=i1),dimension(:), allocatable

private pure function pushnew_i2(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=i2), intent(in), dimension(:), allocatable:: vec
integer(kind=i2), intent(in) :: val

Return Value integer(kind=i2),dimension(:), allocatable

private pure function pushnew_i4(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=i4), intent(in), dimension(:), allocatable:: vec
integer(kind=i4), intent(in) :: val

Return Value integer(kind=i4),dimension(:), allocatable

private pure function pushnew_i8(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=i8), intent(in), dimension(:), allocatable:: vec
integer(kind=i8), intent(in) :: val

Return Value integer(kind=i8),dimension(:), allocatable

private pure function pushnew_r4(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
real(kind=r4), intent(in), dimension(:), allocatable:: vec
real(kind=r4), intent(in) :: val

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

private pure function pushnew_r8(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
real(kind=r8), intent(in), dimension(:), allocatable:: vec
real(kind=r8), intent(in) :: val

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

private pure function pushnew_r16(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
real(kind=r16), intent(in), dimension(:), allocatable:: vec
real(kind=r16), intent(in) :: val

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

private pure function pushnew_c4(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
complex(kind=r4), intent(in), dimension(:), allocatable:: vec
complex(kind=r4), intent(in) :: val

Return Value complex(kind=r4),dimension(:), allocatable

private pure function pushnew_c8(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
complex(kind=r8), intent(in), dimension(:), allocatable:: vec
complex(kind=r8), intent(in) :: val

Return Value complex(kind=r8),dimension(:), allocatable

private pure function pushnew_c16(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
complex(kind=r16), intent(in), dimension(:), allocatable:: vec
complex(kind=r16), intent(in) :: val

Return Value complex(kind=r16),dimension(:), allocatable

private pure function pushnew_str(vec, val) result(res)

Arguments

TypeIntentOptionalAttributesName
character, intent(in), dimension(:), allocatable:: vec
character, intent(in) :: val

Return Value character,dimension(:), allocatable