11   subroutine mymatmult(A, x, y, ierr)  argument
19   subroutine mymatmultadd(A, x, y, z, ierr)  argument
27   subroutine mymatmulttranspose(A, x, y, ierr)  argument
35   subroutine mymatmulthermitiantranspose(A, x, y, ierr)  argument
43   subroutine mymatmulttransposeadd(A, x, y, z, ierr)  argument
51   subroutine mymatmulthermitiantransposeadd(A, x, y, z, ierr)  argument
59   subroutine mymattranspose(A, reuse, B, ierr)  argument
74   subroutine mymatgetdiagonal(A, x, ierr)  argument
82   subroutine mymatdiagonalscale(A, x, y, ierr)  argument
90   subroutine mymatzeroentries(A, ierr)  argument
97   subroutine mymataxpy(A, alpha, B, str, ierr)  argument
106   subroutine mymatshift(A, alpha, ierr)  argument
114   subroutine mymatdiagonalset(A, x, ins, ierr)  argument
123   subroutine mymatdestroy(A, ierr)  argument
130   subroutine mymatview(A, viewer, ierr)  argument
138   subroutine mymatgetvecs(A, x, y, ierr)  argument