popevery Interface

public interface popevery

returns a new vector sequentially deleting every other element from the input vector using the fortran pack function.

Contents

Module Procedures

popevery_i1 popevery_i2 popevery_i4 popevery_i8 popevery_r4 popevery_r8 popevery_r16 popevery_c4 popevery_c8 popevery_c16 popevery_str

Module Procedures

private function popevery_i1(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=i1),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_i2(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=i2),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_i4(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=i4),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_i8(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=i8),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_r4(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r4),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_r8(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r8),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_r16(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r16),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_c4(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r4),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_c8(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r8),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_c16(vec, val) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r16),	intent(in),		dimension(:), allocatable	::	vec
integer,	intent(in)			::	val

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

private function popevery_str(vec, val) result(res)

Arguments

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

Return Value character,dimension(:), allocatable