![]() |
(git:e68414f)
|
Public Member Functions | |
| subroutine | block_add_ab (dir, sab, na, nb, qab, ia, ib, trans) |
| Copy a block out of a matrix and add it to another matrix SAB = SAB + QAB or QAB = QAB + SAB QAB(ia:,ib:) and SAB(1:,1:) | |
Definition at line 43 of file ai_contraction.F.
| subroutine ai_contraction::block_add::block_add_ab | ( | character(len=*), intent(in) | dir, |
| real(kind=dp), dimension(:, :), intent(inout) | sab, | ||
| integer, intent(in) | na, | ||
| integer, intent(in) | nb, | ||
| real(kind=dp), dimension(:, :), intent(inout) | qab, | ||
| integer, intent(in) | ia, | ||
| integer, intent(in) | ib, | ||
| logical, intent(in), optional | trans | ||
| ) |
Copy a block out of a matrix and add it to another matrix SAB = SAB + QAB or QAB = QAB + SAB QAB(ia:,ib:) and SAB(1:,1:)
| dir | "IN" and "OUT" defines direction of copy |
| sab | Matrix input for "IN", output for "OUT" |
| na | first dimension of matrix to copy |
| nb | second dimension of matrix to copy |
| qab | Matrix output for "IN", input for "OUT" Use subblock of this matrix |
| ia | Starting index in qab first dimension |
| ib | Starting index in qab second dimension |
| trans | Matrices (qab and sab) are transposed |
Definition at line 415 of file ai_contraction.F.