Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_type), | intent(inout) | :: | matrix | |||
integer, | intent(in) | :: | index_matrix | |||
integer, | intent(in) | :: | row | |||
integer, | intent(in) | :: | col | |||
integer, | intent(in), | optional | :: | blk | ||
integer, | intent(out), | optional | :: | index |
SUBROUTINE dbcsr_add_work_coordinate(matrix, index_matrix, row, col, blk, index) TYPE(dbcsr_type), INTENT(INOUT) :: matrix INTEGER, INTENT(IN) :: index_matrix, row, col INTEGER, INTENT(IN), OPTIONAL :: blk INTEGER, INTENT(OUT), OPTIONAL :: index CALL add_work_coordinate_prv(matrix%prv%wms(index_matrix), row, col, blk, index) END SUBROUTINE dbcsr_add_work_coordinate