![]() |
(git:b77b4be)
|
Public Member Functions | |
subroutine | force_trace_ab (force, sab, pab, na, nb, m, trans) |
Routine to trace a series of matrices with another matrix Calculate forces of type f(:) = Trace(Pab*Sab(:)) | |
Definition at line 39 of file ai_contraction.F.
subroutine ai_contraction::force_trace::force_trace_ab | ( | real(kind=dp), dimension(:), intent(inout) | force, |
real(kind=dp), dimension(:, :, :), intent(in) | sab, | ||
real(kind=dp), dimension(:, :), intent(in) | pab, | ||
integer, intent(in) | na, | ||
integer, intent(in) | nb, | ||
integer, intent(in) | m, | ||
logical, intent(in), optional | trans | ||
) |
Routine to trace a series of matrices with another matrix Calculate forces of type f(:) = Trace(Pab*Sab(:))
force | Vector to hold output forces |
sab | Input vector of matrices, dimension (:,:,:) |
pab | Input matrix |
na | Active first dimension |
nb | Active second dimension |
m | Number of matrices to be traced |
trans | Matrices are transposed (Sab and Pab) |
Definition at line 370 of file ai_contraction.F.