![]() |
(git:691081d)
|
Public Member Functions | |
| subroutine | fm_contract_aba (matrix_a, matrix_b, matrix_c) |
| Computes A^T B A. | |
| subroutine | fm_contract_aba_set (matrix_a, matrix_b, matrix_c) |
| Computes A^T B_i A for a set of matrices. | |
Definition at line 40 of file gw_fm_utils.F.
| subroutine gw_fm_utils::fm_contract_aba::fm_contract_aba | ( | type(cp_fm_type), intent(in) | matrix_a, |
| type(cp_fm_type), intent(inout) | matrix_b, | ||
| type(cp_fm_type), intent(inout), optional | matrix_c ) |
Computes A^T B A.
| matrix_A | left and right matrix A |
| matrix_B | input matrix B; overwritten by A^T B A if matrix_C is absent |
| matrix_C | optional output matrix C=A^T B A |
Definition at line 187 of file gw_fm_utils.F.
| subroutine gw_fm_utils::fm_contract_aba::fm_contract_aba_set | ( | type(cp_fm_type), intent(in) | matrix_a, |
| type(cp_fm_type), dimension(:), intent(inout) | matrix_b, | ||
| type(cp_fm_type), dimension(:), intent(inout), optional | matrix_c ) |
Computes A^T B_i A for a set of matrices.
| matrix_A | left and right matrix A |
| matrix_B | input matrices B_i; overwritten if matrix_C is absent |
| matrix_C | optional output matrices C_i=A^T B_i A |
Definition at line 222 of file gw_fm_utils.F.