LAPACK  3.5.0
LAPACK: Linear Algebra PACKage
 All Files Functions Typedefs Macros
cupgtr.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine cupgtr (UPLO, N, AP, TAU, Q, LDQ, WORK, INFO)
 CUPGTR More...
 

Function/Subroutine Documentation

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]

Purpose:
 CUPGTR generates a complex unitary matrix Q which is defined as the
 product of n-1 elementary reflectors H(i) of order n, as returned by
 CHPTRD using packed storage:

 if UPLO = 'U', Q = H(n-1) . . . H(2) H(1),

 if UPLO = 'L', Q = H(1) H(2) . . . H(n-1).
Parameters
[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 (N-1)
          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 N-by-N 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 (N-1)
[out]INFO
          INFO is INTEGER
          = 0:  successful exit
          < 0:  if INFO = -i, the i-th argument had an illegal value
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 115 of file cupgtr.f.

Here is the call graph for this function:

Here is the caller graph for this function: