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

Chapter 15 Sparse Eigenvalues and Eigenvectors 1047
Matrix structure input by finite element DSEVIE
Name DSEVIE
Matrix structure input by finite element
Purpose This subprogram adds indices to the set of known nonzeros in the lower
triangle of one of the sparse matrices corresponding to a finite element or
clique.
Usage VECLIB:
CHARACTER*1 matrix
INTEGER*4 nnode, nodlst(nnode), ier
REAL*8 global(150)
CALL DSEVIE(matrix, nnode, nodlst, global, ier)
VECLIB8:
CHARACTER*1 matrix
INTEGER*8 nnode, nodlst(nnode), ier
REAL*8 global(150)
CALL DSEVIE(matrix, nnode, nodlst, 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 nonzero to the matrix on the left
side.
’B’ or ’b’ or
’M’ or ’m’ Add nonzero to the matrix on the right
side.
nnode Number of nodes in the finite element or clique,
1 ≤ nnode ≤ norder, where norder is the matrix order
specified in the call to DSEVIN.
nodlst List of nodes in element or clique, 1 ≤ nodlst(i) ≤ norder
for all i, and nodlst(i) ≠ nodlst(j) for all i and j with i ≠ j.
All pairs (nodlst(i),nodlst(j)) in the lower triangle are
added to the sparsity structure of the matrix
designated by matrix.
Updated nodlst The order of the values in nodlst may be changed.
global Global communications array for this problem. This
array must be passed, untouched by the user, to
successive subroutines in this package.