Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_type), | intent(inout) | :: | matrix | |||
integer, | intent(in) | :: | index_matrix | |||
integer, | intent(in) | :: | newvalue |
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