Skip to main content

AtMatVec

This routine performs transpose matrix vector multiplication for csrmatrix (AT cdotxA^T\ cdot x).

Calling example:

CALL AtMat(CSRMatrix_::obj, Real::x(:), Real::y(:))

Interface

INTERFACE
MODULE SUBROUTINE AtMatvec(obj, x, y)
TYPE(CSRMatrix_), INTENT(IN) :: obj
REAL(DFP), INTENT(IN) :: x(:)
REAL(DFP), INTENT(INOUT) :: y(:)
END SUBROUTINE AtMatvec
END INTERFACE