1ZLAUU2(1) LAPACK auxiliary routine (version 3.2) ZLAUU2(1)
2
3
4
6 ZLAUU2 - computes the product U * U' or L' * L, where the triangular
7 factor U or L is stored in the upper or lower triangular part of the
8 array A
9
11 SUBROUTINE ZLAUU2( UPLO, N, A, LDA, INFO )
12
13 CHARACTER UPLO
14
15 INTEGER INFO, LDA, N
16
17 COMPLEX*16 A( LDA, * )
18
20 ZLAUU2 computes the product U * U' or L' * L, where the triangular fac‐
21 tor U or L is stored in the upper or lower triangular part of the array
22 A. If UPLO = 'U' or 'u' then the upper triangle of the result is
23 stored, overwriting the factor U in A.
24 If UPLO = 'L' or 'l' then the lower triangle of the result is stored,
25 overwriting the factor L in A.
26 This is the unblocked form of the algorithm, calling Level 2 BLAS.
27
29 UPLO (input) CHARACTER*1
30 Specifies whether the triangular factor stored in the array A
31 is upper or lower triangular:
32 = 'U': Upper triangular
33 = 'L': Lower triangular
34
35 N (input) INTEGER
36 The order of the triangular factor U or L. N >= 0.
37
38 A (input/output) COMPLEX*16 array, dimension (LDA,N)
39 On entry, the triangular factor U or L. On exit, if UPLO =
40 'U', the upper triangle of A is overwritten with the upper tri‐
41 angle of the product U * U'; if UPLO = 'L', the lower triangle
42 of A is overwritten with the lower triangle of the product L' *
43 L.
44
45 LDA (input) INTEGER
46 The leading dimension of the array A. LDA >= max(1,N).
47
48 INFO (output) INTEGER
49 = 0: successful exit
50 < 0: if INFO = -k, the k-th argument had an illegal value
51
52
53
54 LAPACK auxiliary routine (versionNo3v.e2m)ber 2008 ZLAUU2(1)