fuse_idx Interface

public interface fuse_idx

Module Procedures

private elemental function fuse_idx_int32(p, q, n_dim, fortran) result(pq)

Fuse p, q into one contiguous index

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	p	2d-array indices
integer(kind=int32),	intent(in)			::	q	2d-array indices
integer(kind=int32),	intent(in)			::	n_dim	number of rows for Fortran (column-major), number of columns for C (row-major).
logical,	intent(in)			::	fortran	Use column major order

Return Value integer(kind=int32)

contiguous 1d-array index

private elemental function fuse_idx_int64(p, q, n_dim, fortran) result(pq)

Fuse p, q into one contiguous index

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	p	2d-array indices
integer(kind=int64),	intent(in)			::	q	2d-array indices
integer(kind=int64),	intent(in)			::	n_dim	number of rows for Fortran (column-major), number of columns for C (row-major).
logical,	intent(in)			::	fortran	Use column major order

Return Value integer(kind=int64)

contiguous 1d-array index