Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_iterator_type), | intent(inout) | :: | iterator | |||
integer, | intent(out) | :: | row | |||
integer, | intent(out) | :: | column | |||
real(kind=real_8), | DIMENSION(:, :), POINTER | :: | block | |||
logical, | intent(out) | :: | transposed | |||
integer, | intent(out), | optional | :: | block_number | ||
integer, | intent(out), | optional | :: | row_size | ||
integer, | intent(out), | optional | :: | col_size | ||
integer, | intent(out), | optional | :: | row_offset | ||
integer, | intent(out), | optional | :: | col_offset |
SUBROUTINE dbcsr_iterator_next_2d_block_d (iterator, row, column, block, &
transposed, block_number, &
row_size, col_size, row_offset, col_offset)
TYPE(dbcsr_iterator_type), INTENT(INOUT) :: iterator
INTEGER, INTENT(OUT) :: row, column
REAL(kind=real_8), DIMENSION(:, :), POINTER :: block
LOGICAL, INTENT(OUT) :: transposed
INTEGER, INTENT(OUT), OPTIONAL :: block_number, row_size, &
col_size, row_offset, &
col_offset
CALL dbcsr_iterator_next_block_prv(iterator%prv, row, column, block, transposed, &
block_number, row_size, col_size, row_offset, col_offset)
END SUBROUTINE dbcsr_iterator_next_2d_block_d