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

pushnew_i1 pushnew_i2 pushnew_i4 pushnew_i8 pushnew_r4 pushnew_r8 pushnew_r16 pushnew_c4 pushnew_c8 pushnew_c16 pushnew_str

Module Procedures

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

Arguments

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
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

Type	Intent	Optional	Attributes		Name
character,	intent(in),		dimension(:), allocatable	::	vec
character,	intent(in)			::	val

Return Value character,dimension(:), allocatable