1CHBMV(1) BLAS routine CHBMV(1)
2
3
4
6 CHBMV - the matrix-vector operation y := alpha*A*x + beta*y,
7
9 SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
10
11 COMPLEX ALPHA,BETA
12
13 INTEGER INCX,INCY,K,LDA,N
14
15 CHARACTER UPLO
16
17 COMPLEX A(LDA,*),X(*),Y(*)
18
20 CHBMV performs the matrix-vector operation
21
22 where alpha and beta are scalars, x and y are n element vectors and A
23 is an n by n hermitian band matrix, with k super-diagonals.
24
25
27 UPLO - CHARACTER*1.
28 On entry, UPLO specifies whether the upper or lower triangular
29 part of the band matrix A is being supplied as follows:
30
31 UPLO = 'U' or 'u' The upper triangular part of A is being sup‐
32 plied.
33
34 UPLO = 'L' or 'l' The lower triangular part of A is being sup‐
35 plied.
36
37 Unchanged on exit.
38
39 N - INTEGER.
40 On entry, N specifies the order of the matrix A. N must be at
41 least zero. Unchanged on exit.
42
43 K - INTEGER.
44 On entry, K specifies the number of super-diagonals of the
45 matrix A. K must satisfy 0 .le. K. Unchanged on exit.
46
47 ALPHA - COMPLEX .
48 On entry, ALPHA specifies the scalar alpha. Unchanged on exit.
49
50 A - COMPLEX array of DIMENSION ( LDA, n ).
51 Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) by n
52 part of the array A must contain the upper triangular band part
53 of the hermitian matrix, supplied column by column, with the
54 leading diagonal of the matrix in row ( k + 1 ) of the array,
55 the first super-diagonal starting at position 2 in row k, and so
56 on. The top left k by k triangle of the array A is not refer‐
57 enced. The following program segment will transfer the upper
58 triangular part of a hermitian band matrix from conventional
59 full matrix storage to band storage:
60
61 DO 20, J = 1, N M = K + 1 - J DO 10, I = MAX( 1, J - K ), J A( M
62 + I, J ) = matrix( I, J ) 10 CONTINUE 20 CONTINUE
63
64 Before entry with UPLO = 'L' or 'l', the leading ( k + 1 ) by n
65 part of the array A must contain the lower triangular band part
66 of the hermitian matrix, supplied column by column, with the
67 leading diagonal of the matrix in row 1 of the array, the first
68 sub-diagonal starting at position 1 in row 2, and so on. The
69 bottom right k by k triangle of the array A is not referenced.
70 The following program segment will transfer the lower triangular
71 part of a hermitian band matrix from conventional full matrix
72 storage to band storage:
73
74 DO 20, J = 1, N M = 1 - J DO 10, I = J, MIN( N, J + K ) A( M +
75 I, J ) = matrix( I, J ) 10 CONTINUE 20 CONTINUE
76
77 Note that the imaginary parts of the diagonal elements need not
78 be set and are assumed to be zero. Unchanged on exit.
79
80 LDA - INTEGER.
81 On entry, LDA specifies the first dimension of A as declared in
82 the calling (sub) program. LDA must be at least ( k + 1 ).
83 Unchanged on exit.
84
85 X - COMPLEX array of DIMENSION at least
86 ( 1 + ( n - 1 )*abs( INCX ) ). Before entry, the incremented
87 array X must contain the vector x. Unchanged on exit.
88
89 INCX - INTEGER.
90 On entry, INCX specifies the increment for the elements of X.
91 INCX must not be zero. Unchanged on exit.
92
93 BETA - COMPLEX .
94 On entry, BETA specifies the scalar beta. Unchanged on exit.
95
96 Y - COMPLEX array of DIMENSION at least
97 ( 1 + ( n - 1 )*abs( INCY ) ). Before entry, the incremented
98 array Y must contain the vector y. On exit, Y is overwritten by
99 the updated vector y.
100
101 INCY - INTEGER.
102 On entry, INCY specifies the increment for the elements of Y.
103 INCY must not be zero. Unchanged on exit.
104
105 Level 2 Blas routine.
106
107 -- Written on 22-October-1986. Jack Dongarra, Argonne National
108 Lab. Jeremy Du Croz, Nag Central Office. Sven Hammarling, Nag
109 Central Office. Richard Hanson, Sandia National Labs.
110
111
112
113BLAS routine November 2006 CHBMV(1)