*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* =====================================================================
*
VERSION 3.3.1 : April 2011
VERSION 3.4.0 : November 2011
VERSION 3.4.1 : April 2012
-VERSION 3.4.2 : August 2012
+VERSION 3.4.2 : September 2012
LAPACK is a library of Fortran 90 with subroutines for solving
the most commonly occurring problems in numerical linear algebra.
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, KL, KU, LDAB, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
* @precisions normal c -> s d z
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, ILO, INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LWORK, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDT, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N, LDT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ITRANS, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, KL, KU, NCOLS, LDAB, LDAFB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Aguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NCOLS, LDA, LDAF
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NZ, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDX, LDY, M, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB, LDC, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDQ, LDQS, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, CUTPNT, INFO, LDQ, N, QSIZ,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, GIVPTR, INFO, K, LDQ, LDQ2, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL NOINIT, RIGHTV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX A, B, C, CS1, EVSCAL, RT1, RT2, SN1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CS1, RT1, RT2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDSA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER J, JOB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDB, LDBX, LDGCOL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexHEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, M, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KB, LDA, LDF, M, N, NB, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX S1, S2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KACC22, KBOT, KTOP, LDH, LDU, LDV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTNC
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB, LDC, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IDIST, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER DOL, DOU, INFO, LDZ, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, PIVOT, SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, K1, K2, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER L, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER COMPZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IUPLO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, DIAG, SIDE, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ, WANTZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDB, LDT, N, M, L
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, KL, KU, LDAB, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBVL, JOBVR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER BALANC, JOBVL, JOBVR, SENSE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, ILO, INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEsing
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
IMPLICIT NONE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LWORK, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDT, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N, LDT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEsing
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDV, LWORK, M, MV, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDV, LWORK, M, MV, N, NSWEEP
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION EPS, SFMIN, TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ITRANS, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION DIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, KL, KU, NCOLS, LDAB, LDAFB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NZ, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDX, LDY, M, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION A, B, C, D, P, Q
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION A, B, C, RT1, RT2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, INFO, MINP, MMAX, MOUT, N, NBMIN, NITMAX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDQ, LDQS, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, INFO, LDQ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, N, N1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, N, N1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL ORGATI
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, CUTPNT, ICOMPQ, INFO, LDQ, N,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, GIVPTR, ICOMPQ, INFO, K, LDQ, LDQ2, N,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, KSTART, KSTOP, LDQ, LDS, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, INFO, N, TLVLS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL NOINIT, RIGHTV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION A, B, C, CS1, RT1, RT2, SN1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDSA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL UPPER
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, JOB, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER J, JOB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION DIN1, DIN2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LTRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDB, LDBX, LDGCOL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER DTRD1, DTRD2, N1, N2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, R
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION A, B, C, CS, D, RT1I, RT1R, RT2I, RT2R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION X, Y, Z
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, M, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KB, LDA, LDF, M, N, NB, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION SI1, SI2, SR1, SR2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KACC22, KBOT, KTOP, LDH, LDU, LDV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LREAL, LTRAN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTNC
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IDIST, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N, NSPLIT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IFIRST, ILAST, INFO, N, OFFSET, TWIST
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER ORDER, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CLSTRT, CLEND, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IFIRST, ILAST, INFO, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, IW, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, INFO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER DOL, DOU, INFO, LDZ, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CS, F, G, R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CS, F, G, R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CS, SIGMA, SN, X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION F, G, H, SSMAX, SSMIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDU, LDVT, N, SMLSIZ, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDU, LDVT, NL, NR, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDU, LDU2, LDVT, LDVT2, NL, NR, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, LDU, LDU2, LDVT, LDVT2, NL, NR,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDGCOL, LDGNUM, NL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDGCOL, LDGNUM, NL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, K, LDDIFR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDGCOL, LDU, N, SMLSIZ, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LVL, MSUB, N, ND
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL IEEE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I0, N0, N0IN, PP, TTYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL IEEE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I0, N0, PP
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, PIVOT, SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER ID
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CSL, CSR, F, G, H, SNL, SNR, SSMAX, SSMIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, K1, K2, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LTRANL, LTRANR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER L, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER COMPZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, LDX, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doublePTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYdriver
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, FACT, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, DIAG, SIDE, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ, WANTZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDB, LDT, N, M, L
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* =====================================================================
*
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complexOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, KL, KU, LDAB, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBVL, JOBVR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER BALANC, JOBVL, JOBVR, SENSE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, ILO, INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEsing
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
IMPLICIT NONE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LWORK, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDT, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N, LDT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEsing
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDV, LWORK, M, MV, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDV, LWORK, M, MV, N, NSWEEP
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL EPS, SFMIN, TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ITRANS, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL SIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, KL, KU, NCOLS, LDAB, LDAFB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NZ, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDX, LDY, M, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL A, B, C, D, P, Q
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL A, B, C, RT1, RT2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, INFO, MINP, MMAX, MOUT, N, NBMIN, NITMAX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDQ, LDQS, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, INFO, LDQ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, N, N1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, N, N1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL ORGATI
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, CUTPNT, ICOMPQ, INFO, LDQ, N,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, GIVPTR, ICOMPQ, INFO, K, LDQ, LDQ2, N,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, KSTART, KSTOP, LDQ, LDS, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, INFO, N, TLVLS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL NOINIT, RIGHTV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL A, B, C, CS1, RT1, RT2, SN1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDSA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL UPPER
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, JOB, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER J, JOB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL SIN1, SIN2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LTRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDB, LDBX, LDGCOL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N1, N2, STRD1, STRD2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, R
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL A, B, C, CS, D, RT1I, RT1R, RT2I, RT2R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL X, Y, Z
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, M, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KB, LDA, LDF, M, N, NB, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL SI1, SI2, SR1, SR2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KACC22, KBOT, KTOP, LDH, LDU, LDV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LREAL, LTRAN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTNC
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IDIST, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N, NSPLIT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IFIRST, ILAST, INFO, N, OFFSET, TWIST
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER ORDER, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CLSTRT, CLEND, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IFIRST, ILAST, INFO, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, IW, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, INFO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER DOL, DOU, INFO, LDZ, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CS, F, G, R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CS, F, G, R, SN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CS, SIGMA, SN, X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL F, G, H, SSMAX, SSMIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDU, LDVT, N, SMLSIZ, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDU, LDVT, NL, NR, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDU, LDU2, LDVT, LDVT2, NL, NR, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, LDU, LDU2, LDVT, LDVT2, NL, NR,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I, INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDGCOL, LDGNUM, NL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDGCOL, LDGNUM, NL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, K, LDDIFR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDGCOL, LDU, N, SMLSIZ, SQRE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LVL, MSUB, N, ND
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL IEEE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I0, N0, N0IN, PP, TTYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL IEEE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER I0, N0, PP
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, PIVOT, SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER ID
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup auxOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL CSL, CSR, F, G, H, SNL, SNR, SSMAX, SSMIN
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, K1, K2, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL LTRANL, LTRANR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup doubleOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER L, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPOcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER COMPZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, LDX, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realPTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYdriver
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, FACT, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, DIAG, SIDE, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realGEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ, WANTZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realSYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDB, LDT, N, M, L
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup realOTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, KL, KU, LDAB, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, ILO, INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LWORK, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDT, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N, LDT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ITRANS, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEeigen
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, KL, KU, NCOLS, LDAB, LDAFB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Aguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NCOLS, LDA, LDAF
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, NZ, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16POcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16POcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16POcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16POcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA, BETA
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER*1 UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDX, LDY, M, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KASE, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB, LDC, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX*16 X, Y
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDQ, LDQS, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CURLVL, CURPBM, CUTPNT, INFO, LDQ, N, QSIZ,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER CUTPNT, GIVPTR, INFO, K, LDQ, LDQ2, N, QSIZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL NOINIT, RIGHTV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX*16 A, B, C, CS1, EVSCAL, RT1, RT2, SN1
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CS1, RT1, RT2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDSA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER K, LDA, LDT, LDY, N, NB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER J, JOB
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER GIVPTR, ICOMPQ, INFO, K, LDB, LDBX, LDGCOL,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORM, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL FORWRD
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GBauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16HEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, M, N, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER KB, LDA, LDF, M, N, NB, OFFSET
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
COMPLEX*16 S1, S2
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IHIZ, ILOZ, KACC22, KBOT, KTOP, LDH, LDU, LDV,
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER EQUED, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTNC
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER LDA, LDB, LDC, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IDIST, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER DOL, DOU, INFO, LDZ, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION CS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCC, INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, STOREV
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TYPE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER M, N, LDX
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, PIVOT, SIDE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, K1, K2, LDA, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IJOB, LDZ, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, NORMIN, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER L, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16POcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
DOUBLE PRECISION TOL
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER COMPZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTsolve
*
* -- LAPACK driver routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER FACT
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16PTcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER IUPLO, LDB, N, NRHS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INCX, INCY, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER JOBZ, RANGE
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, DIAG, SIDE, TRANS, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16GEauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL WANTQ, WANTZ
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16SYauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, LDB, LDT, N, M, L
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERauxiliary
*
* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIRECT, SIDE, STOREV, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER DIAG, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER TRANSR, UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER UPLO
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
INTEGER INFO, K, LDA, M, N
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16OTHERcomputational
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
CHARACTER SIDE, TRANS
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex16_eig
*
* -- LAPACK test routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
LOGICAL TSTERR
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup complex_lin
*
* -- LAPACK test routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* =====================================================================
*
*> \author Univ. of Colorado Denver
*> \author NAG Ltd.
*
-*> \date August 2012
+*> \date September 2012
*
*> \ingroup real_matgen
*
* -- LAPACK computational routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* August 2012
+* September 2012
*
* .. Scalar Arguments ..
REAL COND