enumerate_block_elements Subroutine

private subroutine enumerate_block_elements(blk_size, blk_offset, tensor_size, blk_2, blk_3, blk_4)

Enumerate tensor entries in block \blk_2 block values for 2 dimensions \blk_3 block values for 3 dimensions

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		DIMENSION(:)	::	blk_size	size of block block offset (indices of first element) global tensor sizes
integer,	intent(in),		DIMENSION(:)	::	blk_offset	size of block block offset (indices of first element) global tensor sizes
integer,	intent(in),		DIMENSION(:)	::	tensor_size	size of block block offset (indices of first element) global tensor sizes
real(kind=real_8),	intent(out),	optional,	DIMENSION(:,:)	::	blk_2
real(kind=real_8),	intent(out),	optional,	DIMENSION(:,:,:)	::	blk_3
real(kind=real_8),	intent(out),	optional,	DIMENSION(:,:,:,:)	::	blk_4