SSYR/DSYR/CHER/ZHER |
| ||
| CHARACTER*1 | uplo |
|
| INTEGER*4 | n, lda, incx |
|
| REAL*8 | alpha |
|
| COMPLEX*16 | a(lda, n), x(lenx) | |
| CALL ZHER(uplo, n, alpha, x, incx, a, lda) | ||
| VECLIB8: |
|
|
| CHARACTER*1 | uplo |
|
| INTEGER*8 | n, lda, incx |
|
| REAL*4 | alpha, a(lda, n), x(lenx) | |
| CALL SSYR(uplo, n, alpha, x, incx, a, lda) | ||
| CHARACTER*1 | uplo |
|
| INTEGER*8 | n, lda, incx |
|
| REAL*8 | alpha, a(lda, n), x(lenx) | |
| CALL DSYR(uplo, n, alpha, x, incx, a, lda) | ||
| CHARACTER*1 | uplo |
|
| INTEGER*8 | n, lda, incx |
|
| REAL*4 | alpha |
|
| COMPLEX*8 | a(lda, n), x(lenx) | |
| CALL CHER(uplo, n, alpha, x, incx, a, lda) | ||
| CHARACTER*1 | uplo |
|
| INTEGER*8 | n, lda, incx |
|
| REAL*8 | alpha |
|
| COMPLEX*16 | a(lda, n), x(lenx) | |
| CALL ZHER(uplo, n, alpha, x, incx, 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 vector x, n ≥ 0. If n = 0, the subprograms do not | |
|
| reference a or x. |
|
| alpha | The scalar α. If alpha = 0, the subprograms do not | |
|
| reference a or x. |
|
| x | Array of length lenx = (n−1)⋅incx+1 containing the | |
|
|
| |
| incx | Increment for the array x, incx ≠ 0: | |
276HP MLIB User’s Guide