block_buffer_get_next_block_c_sp Subroutine

private subroutine block_buffer_get_next_block_c_sp(buffer, ndata, index, block, advance_iter)

get next block from buffer. Iterator is advanced only if block is retrieved or advance_iter.

Arguments

Type IntentOptional Attributes Name
type(block_buffer_type), intent(inout) :: buffer
integer, intent(out) :: ndata
integer(kind=int_8), intent(out), DIMENSION(2) :: index
complex(kind=real_4), intent(out), optional, DIMENSION(:, :) :: block
logical, intent(in), optional :: advance_iter