zip Interface

public interface zip

returns a new vector, sequentially joining two other input vectors. for example, a=[1,2]; b=[3,4]; c=zip(a,b)=[1,3,2,4]

Contents

Module Procedures

zip_i1 zip_i2 zip_i4 zip_i8 zip_r4 zip_r8 zip_r16 zip_c4 zip_c8 zip_c16 zip_str

Module Procedures

private pure function zip_i1(vec1, vec2) result(res)

Arguments

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

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

private pure function zip_i2(vec1, vec2) result(res)

Arguments

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

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

private pure function zip_i4(vec1, vec2) result(res)

Arguments

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

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

private pure function zip_i8(vec1, vec2) result(res)

Arguments

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

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

private pure function zip_r4(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r4),	intent(in),		dimension(:), allocatable	::	vec1
real(kind=r4),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_r8(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r8),	intent(in),		dimension(:), allocatable	::	vec1
real(kind=r8),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_r16(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r16),	intent(in),		dimension(:), allocatable	::	vec1
real(kind=r16),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_c4(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r4),	intent(in),		dimension(:), allocatable	::	vec1
complex(kind=r4),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_c8(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r8),	intent(in),		dimension(:), allocatable	::	vec1
complex(kind=r8),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_c16(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=r16),	intent(in),		dimension(:), allocatable	::	vec1
complex(kind=r16),	intent(in),		dimension(:), allocatable	::	vec2

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

private pure function zip_str(vec1, vec2) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
character,	intent(in),		dimension(:), allocatable	::	vec1
character,	intent(in),		dimension(:), allocatable	::	vec2

Return Value character,dimension(:), allocatable