Sets the referenced size of the data area
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_data_obj), | intent(inout) | :: | data_area |
area for which to set referenced data size |
||
integer, | intent(in) | :: | referenced_size |
set referenced data size to this value |
PURE SUBROUTINE dbcsr_data_set_size_referenced(data_area, referenced_size) !! Sets the referenced size of the data area TYPE(dbcsr_data_obj), INTENT(INOUT) :: data_area !! area for which to set referenced data size INTEGER, INTENT(IN) :: referenced_size !! set referenced data size to this value data_area%d%ref_size = referenced_size END SUBROUTINE dbcsr_data_set_size_referenced