44 character,
intent(in) :: matfile*30
46 logical,
optional :: fakec
62 _qrm_data,
intent(out) :: y(:,:)
63 _qrm_data,
intent(in) :: x(:,:)
64 _qrm_data,
intent(in) :: alpha, beta
65 character(len=*) :: transp
70 _qrm_data,
intent(out) :: y(:)
71 _qrm_data,
intent(in) :: x(:)
72 _qrm_data,
intent(in) :: alpha, beta
73 character(len=*) :: transp
88 _qrm_data,
intent(in) :: vec(:,:)
90 integer,
intent(in) :: n
94 _qrm_data,
intent(in) :: vec(:)
96 integer,
intent(in) :: n
106 _qrm_data,
target :: arr1d(1:n)
107 _qrm_data,
pointer :: pnt2d(:,:)
129 _qrm_data,
intent(out) :: y(:,:)
130 _qrm_data,
intent(in) :: x(:,:)
131 _qrm_data,
intent(in) :: alpha, beta
132 character(len=*) :: transp
140 _qrm_data,
intent(out) :: y(:)
141 _qrm_data,
intent(in) :: x(:)
142 _qrm_data,
intent(in) :: alpha, beta
143 character(len=*) :: transp
150 _qrm_data,
intent(in) :: vec(:,:)
152 integer,
intent(in) :: n
159 _qrm_data,
intent(in) :: vec(:)
161 integer,
intent(in) :: n
This module contains generic interfaces for a number of auxiliary tools.
Generic interface for the ::_qrm_vecnrm2d and ::_qrm_vecnrm1d routines.
subroutine _qrm_matmul2d(qrm_mat, transp, alpha, x, beta, y)
This subroutine computes the product y=beta*y+alpha*op(A)*x where op(A) is either A or A' depending o...
subroutine _qrm_remap_pnt(arr1d, pnt2d, n)
This function makes a 2D pointer point to a 1D array.
subroutine _qrm_vecnrm2dw(vec, n, ntype, nrm)
Generic interface for the ::_qrm_remap_pnt routine.
subroutine _qrm_vecnrm1d(vec, n, ntype, nrm)
This subroutine computes the norm of a vector.
Generic interface for the ::_qrm_vecnrm2d and ::_qrm_vecnrm1d routines.
subroutine _qrm_matnrm(qrm_mat, ntype, nrm)
This subroutine computes the matrix norm. The return value is a real scalar.
Generic interface for the ::_qrm_readmat routine.
subroutine _qrm_vecnrm2d(vec, n, ntype, nrm)
This subroutine computes the norm of multiple vectors.
This type defines the data structure used to store a matrix.
subroutine _qrm_readmat(matfile, qrm_mat, fakec)
This subroutine reads a Matrix Market matrix from a file and stores it on the host processor...
subroutine _qrm_matmul1d(qrm_mat, transp, alpha, x, beta, y)
This subroutine computes the product y=beta*y+alpha*op(A)*x where op(A) is either A or A' depending o...
subroutine _qrm_matmul2dw(qrm_mat, transp, alpha, x, beta, y)
Generic interface for the ::_qrm_matmul2d and ::_qrm_matmul1d routines.
This module contains the definition of the basic sparse matrix type and of the associated methods...
subroutine _qrm_matmul1dw(qrm_mat, transp, alpha, x, beta, y)
subroutine _qrm_vecnrm1dw(vec, n, ntype, nrm)
Generic interface for the ::_qrm_matmul2d and ::_qrm_matmul1d routines.