dbcsr_mutable_instantiated Function

public pure function dbcsr_mutable_instantiated(mutable) result(instantiated)

Unregisters a reference to the mutable data type The object is destroy when there is no reference to it left.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_mutable_obj), intent(in) :: mutable

mutable data

Return Value logical

whether the object is instantiated


Source Code

   PURE FUNCTION dbcsr_mutable_instantiated(mutable) RESULT(instantiated)
      !! Unregisters a reference to the mutable data type
      !! The object is destroy when there is no reference to it left.

      TYPE(dbcsr_mutable_obj), INTENT(IN)                :: mutable
         !! mutable data
      LOGICAL                                            :: instantiated
         !! whether the object is instantiated

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

      instantiated = ASSOCIATED(mutable%m)
   END FUNCTION dbcsr_mutable_instantiated