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

674 HP MLIB LAPACK User’s Guide
SLANSP/DLANSP/CLANHP/CLANSP/.../ZLANSP Compute norm of symmetric or Hermitian packed matrix
CHARACTER*1 norm, uplo
INTEGER*8 n
REAL*8 rwork(n)
COMPLEX*16 ap((n*(n+1))/2)
REAL*8 anorm, ZLANHP
anorm = ZLANHP(norm, uplo, n, ap, rwork)
CHARACTER*1 norm, uplo
INTEGER*8 n
REAL*8 rwork(n)
COMPLEX*16 ap((n*(n+1))/2)
REAL*8 anorm, CLANSP
anorm = ZLANSP(norm, uplo, n, ap, rwork)
Input norm Specifies which norm is to be computed, as follows:
norm = ’F’, ’f’, ’E’, or ’e’ Compute ||A||
F
= the Frobenius
norm.
norm = ’I’ or ’i’ Compute ||A||
= maximum
row sum.
norm = ’1’, ’O’, or ’o’ Compute ||A||
1
= maximum
column sum.
norm = ’M’ or ’m’ Compute max(|A
ij
|).
uplo Specifies whether the upper or lower triangular part of
the symmetric or Hermitian matrix A is stored, as
follows:
uplo = ’U’ or ’u’ The upper triangular part of A
is stored.
uplo = ’Lor ’l’ The lower triangular part of A
is stored.
n The order of the matrix A. n 0.
ap The upper or lower triangular part of the symmetric or
Hermitian matrix A, packed columnwise in a linear
array as follows:
If uplo = ’U’ or ’u’, ap(i + ((j1) × j)/2) = A(i,j) for 1 i j;
If uplo = ’L’ or ’l’, ap(i + ((j1) × (2nj))/2) = A(i,j)
for j i n.