Change the datasize of the original workspace buffer
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_mm_sched_type), | intent(inout) | :: | this | |||
integer, | intent(in) | :: | newsize |
SUBROUTINE dbcsr_mm_sched_set_orig_datasize(this, newsize)
!! Change the datasize of the original workspace buffer
TYPE(dbcsr_mm_sched_type), INTENT(INOUT) :: this
INTEGER, INTENT(IN) :: newsize
this%product_wm_orig_datasize = newsize
END SUBROUTINE dbcsr_mm_sched_set_orig_datasize