dbcsr_get_data_s Function

private function dbcsr_get_data_s(matrix, select_data_type, lb, ub) result(DATA)

Arguments

Type IntentOptional Attributes Name
type(dbcsr_type), intent(in) :: matrix
real(kind=real_4), intent(in) :: select_data_type
integer, intent(in), optional :: lb
integer, intent(in), optional :: ub

Return Value real(kind=real_4), DIMENSION(:), POINTER


Source Code

      FUNCTION dbcsr_get_data_s (matrix, select_data_type, lb, ub) RESULT(DATA)
         TYPE(dbcsr_type), INTENT(IN)     :: matrix
         REAL(kind=real_4), INTENT(IN)              :: select_data_type
         REAL(kind=real_4), DIMENSION(:), POINTER   :: DATA
         INTEGER, INTENT(IN), OPTIONAL    :: lb, ub

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