HP MLIB User's Guide Vol. 2 7th Ed.

1068 HP MLIB User’s Guide

DSEVVC Matrix value input by column

Name DSEVVC

Matrix value input by column

Purpose This subprogram adds to the values of a list of nonzero entries in the lower

triangle of a single column of one of the sparse matrices.

Usage VECLIB:

CHARACTER*1 matrix

INTEGER*4 jcol, nzcol, jrowin(nzcol), ier

REAL*8 values(nzcol), global(150)

CALL DSEVVC(matrix, jcol, nzcol, jrowin, values, global, ier)

VECLIB8:

CHARACTER*1 matrix

INTEGER*8 jcol, nzcol, jrowin(nzcol), ier

REAL*8 values(nzcol), global(150)

CALL DSEVVC(matrix, jcol, nzcol, jrowin, values, global, ier)

Input matrix Character string denoting the matrix for which the

nonzero location is being input:

’A’ or ’a’ or

’K’ or ’k’ Add to the matrix on the left side.

’B’ or ’b’ or

’M’ or ’m’ Add to the matrix on the right side.

jcol Column index, 1 ≤ jcol ≤ norder, where norder is the

matrix order as speciﬁed in the call to DSEVIN.

nzcol Number of values in the list to be added to column jcol

of the matrix, nzcol > 0.

jrowin List of row indices in ascending order for values to be

added to the lower triangle part of column jcol of the

matrix designated by matrix, jcol ≤jrowin(1) <

jrowin(2) < ... < jrowin(nzcol) ≤ norder. It is not

necessary that all entries in column jcol be included in

jrowin.

values List of values corresponding to positions speciﬁed by

jcol and jrowin.

Updated global Global communications array for this problem. This

array must be passed, untouched by the user, to

successive subroutines in this package.