Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_iterator_type), | intent(in) | :: | iterator |
PURE FUNCTION dbcsr_iterator_blocks_left(iterator) RESULT(blocks_left)
TYPE(dbcsr_iterator_type), INTENT(IN) :: iterator
LOGICAL :: blocks_left
blocks_left = dbcsr_iterator_blocks_left_prv(iterator%prv)
END FUNCTION dbcsr_iterator_blocks_left