dbcsr_has_symmetry Function

public pure function dbcsr_has_symmetry(matrix) result(has_symmetry)

Whether matrix has symmetry

Arguments

Type IntentOptional Attributes Name
type(dbcsr_type), intent(in) :: matrix

query this matrix

Return Value logical

matrix has symmetry


Source Code

   PURE FUNCTION dbcsr_has_symmetry(matrix) RESULT(has_symmetry)
      !! Whether matrix has symmetry

      TYPE(dbcsr_type), INTENT(IN)                       :: matrix
         !! query this matrix
      LOGICAL                                            :: has_symmetry
         !! matrix has symmetry

      has_symmetry = matrix%symmetry
   END FUNCTION dbcsr_has_symmetry