Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_type), | intent(inout) | :: | matrix | |||
integer, | intent(in) | :: | row | |||
integer, | intent(in) | :: | col | |||
complex(kind=real_8), | intent(in), | DIMENSION(:, :) | :: | block | ||
logical, | intent(in), | optional | :: | summation | ||
complex(kind=real_8), | intent(in), | optional | :: | scale |
SUBROUTINE dbcsr_put_block2d_z (matrix, row, col, block, &
summation, scale)
TYPE(dbcsr_type), INTENT(INOUT) :: matrix
INTEGER, INTENT(IN) :: row, col
COMPLEX(kind=real_8), DIMENSION(:, :), INTENT(IN) :: block
LOGICAL, INTENT(IN), OPTIONAL :: summation
COMPLEX(kind=real_8), INTENT(IN), OPTIONAL :: scale
CALL dbcsr_put_block_prv(matrix%prv, row, col, block, summation=summation, scale=scale)
END SUBROUTINE dbcsr_put_block2d_z