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