dbcsr_get_wms_data_z Function

private function dbcsr_get_wms_data_z(matrix, index_matrix, select_data_type, lb, ub) result(DATA)

Arguments

TypeIntentOptionalAttributesName
type(dbcsr_type), intent(in) :: matrix
integer, intent(in) :: index_matrix
complex(kind=real_8), intent(in) :: select_data_type
integer, intent(in), optional :: lb
integer, intent(in), optional :: ub

Return Value complex(kind=real_8),DIMENSION(:),POINTER


Contents

Source Code


Source Code

      FUNCTION dbcsr_get_wms_data_z (matrix, index_matrix, select_data_type, lb, ub) RESULT(DATA)
         TYPE(dbcsr_type), INTENT(IN)     :: matrix
         INTEGER, INTENT(IN)              :: index_matrix
         COMPLEX(kind=real_8), INTENT(IN)              :: select_data_type
         COMPLEX(kind=real_8), DIMENSION(:), POINTER   :: DATA
         INTEGER, INTENT(IN), OPTIONAL    :: lb, ub

         DATA => dbcsr_get_data_p_prv(matrix%prv%wms(index_matrix)%data_area, select_data_type, lb, ub)
      END FUNCTION dbcsr_get_wms_data_z