SSYR2/DSYR2/CHER2/ZHER2

 

Rank-2 update

 

CHARACTER*1

uplo

 

 

INTEGER*4

n, lda, incx, incy

 

COMPLEX*16

alpha, a(lda, n), x(lenx), y(leny)

 

CALL ZHER2(uplo, n, alpha, x, incx, y, incy, a, lda)

 

VECLIB8:

 

 

 

CHARACTER*1

uplo

 

 

INTEGER*8

n, lda, incx, incy

 

REAL*4

alpha, a(lda, n), x(lenx), y(leny)

 

CALL SSYR2(uplo, n, alpha, x, incx, y, incy, a, lda)

 

CHARACTER*1

uplo

 

 

INTEGER*8

n, lda, incx, incy

 

REAL*8

alpha, a(lda, n), x(lenx), y(leny)

 

CALL DSYR2(uplo, n, alpha, x, incx, y, incy, a, lda)

 

CHARACTER*1

uplo

 

 

INTEGER*8

n, lda, incx, incy

 

COMPLEX*8

alpha, a(lda, n), x(lenx), y(leny)

 

CALL CHER2(uplo, n, alpha, x, incx, y, incy, a, lda)

 

CHARACTER*1

uplo

 

 

INTEGER*8

n, lda, incx, incy

 

COMPLEX*16

alpha, a(lda, n), x(lenx), y(leny)

 

CALL ZHER2(uplo, n, alpha, x, incx, y, incy, a, lda)

Input

uplo

Upper/lower triangular option for A:

 

 

’L’ or ’l’

Reference and update only the lower

 

 

 

triangle of A.

 

 

’U’ or ’u’

Reference and update only the upper

 

 

 

triangle of A.

 

n

Number of rows and columns in matrix A and elements

 

 

of vectors x and y, n ≥ 0. If n = 0, the subprograms do

 

 

not reference a, x, or y.

 

alpha

The scalar α. If alpha = 0, the subprograms do not

 

 

reference a, x, or y.

 

x

Array of length lenx = (n−1)⋅incx+1 containing the

 

 

n-vector x.

 

 

incx

Increment for the array x, incx ≠ 0:

 

 

incx > 0

x is stored forward in array x; that is,

 

 

 

xi is stored in x((i−1)⋅incx+1).

280HP MLIB User’s Guide