dbcsr_iterator_blocks_left Function

  1. dbcsr_api.F
  2. dbcsr_api
  3. dbcsr_iterator_blocks_left

public pure function dbcsr_iterator_blocks_left(iterator) result(blocks_left)

Arguments

Type IntentOptional Attributes Name
type(dbcsr_iterator_type), intent(in) :: iterator

Return Value logical


Contents

Source Code

dbcsr_iterator_blocks_left

Source Code

   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