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

TypeIntentOptionalAttributesName
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

Contents

None