dbcsr_wm_use_mutable Function

public pure function dbcsr_wm_use_mutable(wm) result(use_mutable)

Returns whether this work matrix uses the mutable type

Arguments

Type IntentOptional Attributes Name
type(dbcsr_work_type), intent(in) :: wm

work matrix

Return Value logical

use the mutable and not append-only working structures


Source Code

   PURE FUNCTION dbcsr_wm_use_mutable(wm) RESULT(use_mutable)
      !! Returns whether this work matrix uses the mutable type

      TYPE(dbcsr_work_type), INTENT(IN)                  :: wm
         !! work matrix
      LOGICAL                                            :: use_mutable
         !! use the mutable and not append-only working structures

!   ---------------------------------------------------------------------------

      use_mutable = dbcsr_mutable_instantiated(wm%mutable)
   END FUNCTION dbcsr_wm_use_mutable