dbcsr_set_work_size Subroutine

public subroutine dbcsr_set_work_size(matrix, index_matrix, newvalue)

Arguments

TypeIntentOptionalAttributesName
type(dbcsr_type), intent(inout) :: matrix
integer, intent(in) :: index_matrix
integer, intent(in) :: newvalue

Contents

Source Code


Source Code

   SUBROUTINE dbcsr_set_work_size(matrix, index_matrix, newvalue)
      TYPE(dbcsr_type), INTENT(INOUT)                    :: matrix
      INTEGER, INTENT(IN)                                :: index_matrix, newvalue

      matrix%prv%wms(index_matrix)%datasize = newvalue
   END SUBROUTINE dbcsr_set_work_size