LAPACK
3.4.2
LAPACK: Linear Algebra PACKage

Go to the source code of this file.
Functions/Subroutines  
subroutine  cupgtr (UPLO, N, AP, TAU, Q, LDQ, WORK, INFO) 
CUPGTR 
subroutine cupgtr  (  character  UPLO, 
integer  N,  
complex, dimension( * )  AP,  
complex, dimension( * )  TAU,  
complex, dimension( ldq, * )  Q,  
integer  LDQ,  
complex, dimension( * )  WORK,  
integer  INFO  
) 
CUPGTR
Download CUPGTR + dependencies [TGZ] [ZIP] [TXT]CUPGTR generates a complex unitary matrix Q which is defined as the product of n1 elementary reflectors H(i) of order n, as returned by CHPTRD using packed storage: if UPLO = 'U', Q = H(n1) . . . H(2) H(1), if UPLO = 'L', Q = H(1) H(2) . . . H(n1).
[in]  UPLO  UPLO is CHARACTER*1 = 'U': Upper triangular packed storage used in previous call to CHPTRD; = 'L': Lower triangular packed storage used in previous call to CHPTRD. 
[in]  N  N is INTEGER The order of the matrix Q. N >= 0. 
[in]  AP  AP is COMPLEX array, dimension (N*(N+1)/2) The vectors which define the elementary reflectors, as returned by CHPTRD. 
[in]  TAU  TAU is COMPLEX array, dimension (N1) TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by CHPTRD. 
[out]  Q  Q is COMPLEX array, dimension (LDQ,N) The NbyN unitary matrix Q. 
[in]  LDQ  LDQ is INTEGER The leading dimension of the array Q. LDQ >= max(1,N). 
[out]  WORK  WORK is COMPLEX array, dimension (N1) 
[out]  INFO  INFO is INTEGER = 0: successful exit < 0: if INFO = i, the ith argument had an illegal value 
Definition at line 115 of file cupgtr.f.