LAPACK  3.4.2
LAPACK: Linear Algebra PACKage
 All Files Functions Groups
Functions/Subroutines
aux
Linear Solve
Collaboration diagram for aux:

Functions/Subroutines

subroutine aladhd (IOUNIT, PATH)
 ALADHD
subroutine alaerh (PATH, SUBNAM, INFO, INFOE, OPTS, M, N, KL, KU, N5, IMAT, NFAIL, NERRS, NOUT)
 ALAERH
subroutine alaesm (PATH, OK, NOUT)
 ALAESM
subroutine alahd (IOUNIT, PATH)
 ALAHD
subroutine alareq (PATH, NMATS, DOTYPE, NTYPES, NIN, NOUT)
 ALAREQ
subroutine alasum (TYPE, NOUT, NFAIL, NRUN, NERRS)
 ALASUM
subroutine alasvm (TYPE, NOUT, NFAIL, NRUN, NERRS)
 ALASVM
subroutine icopy (N, SX, INCX, SY, INCY)
 ICOPY
INTEGER function ilaenv (ISPEC, NAME, OPTS, N1, N2, N3, N4)
 ILAENV
subroutine xlaenv (ISPEC, NVALUE)
 XLAENV

Detailed Description

This is the group of auxiliary LAPACK TESTING LIN routines.

Function/Subroutine Documentation

subroutine aladhd ( integer  IOUNIT,
character*3  PATH 
)

ALADHD

Purpose: 
 ALADHD prints header information for the driver routines test paths.
Parameters:
[in]IOUNIT
          IOUNIT is INTEGER
          The unit number to which the header information should be
          printed.
[in]PATH
          PATH is CHARACTER*3
          The name of the path for which the header information is to
          be printed.  Current paths are
             _GE:  General matrices
             _GB:  General band
             _GT:  General Tridiagonal
             _PO:  Symmetric or Hermitian positive definite
             _PS:  Symmetric or Hermitian positive semi-definite
             _PP:  Symmetric or Hermitian positive definite packed
             _PB:  Symmetric or Hermitian positive definite band
             _PT:  Symmetric or Hermitian positive definite tridiagonal
             _SY:  Symmetric indefinite
             _SP:  Symmetric indefinite packed
             _HE:  (complex) Hermitian indefinite
             _HP:  (complex) Hermitian indefinite packed
          The first character must be one of S, D, C, or Z (C or Z only
          if complex).
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
April 2012

Definition at line 71 of file aladhd.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine alaerh ( character*3  PATH,
character*( * )  SUBNAM,
integer  INFO,
integer  INFOE,
character*( * )  OPTS,
integer  M,
integer  N,
integer  KL,
integer  KU,
integer  N5,
integer  IMAT,
integer  NFAIL,
integer  NERRS,
integer  NOUT 
)

ALAERH

Purpose: 
 ALAERH is an error handler for the LAPACK routines.  It prints the
 header if this is the first error message and prints the error code
 and form of recovery, if any.  The character evaluations in this
 routine may make it slow, but it should not be called once the LAPACK
 routines are fully debugged.
Parameters:
[in]PATH
          PATH is CHARACTER*3
          The LAPACK path name of subroutine SUBNAM.
[in]SUBNAM
          SUBNAM is CHARACTER*(*)
          The name of the subroutine that returned an error code.
[in]INFO
          INFO is INTEGER
          The error code returned from routine SUBNAM.
[in]INFOE
          INFOE is INTEGER
          The expected error code from routine SUBNAM, if SUBNAM were
          error-free.  If INFOE = 0, an error message is printed, but
          if INFOE.NE.0, we assume only the return code INFO is wrong.
[in]OPTS
          OPTS is CHARACTER*(*)
          The character options to the subroutine SUBNAM, concatenated
          into a single character string.  For example, UPLO = 'U',
          TRANS = 'T', and DIAG = 'N' for a triangular routine would
          be specified as OPTS = 'UTN'.
[in]M
          M is INTEGER
          The matrix row dimension.
[in]N
          N is INTEGER
          The matrix column dimension.  Accessed only if PATH = xGE or
          xGB.
[in]KL
          KL is INTEGER
          The number of sub-diagonals of the matrix.  Accessed only if
          PATH = xGB, xPB, or xTB.  Also used for NRHS for PATH = xLS.
[in]KU
          KU is INTEGER
          The number of super-diagonals of the matrix.  Accessed only
          if PATH = xGB.
[in]N5
          N5 is INTEGER
          A fifth integer parameter, may be the blocksize NB or the
          number of right hand sides NRHS.
[in]IMAT
          IMAT is INTEGER
          The matrix type.
[in]NFAIL
          NFAIL is INTEGER
          The number of prior tests that did not pass the threshold;
          used to determine if the header should be printed.
[in,out]NERRS
          NERRS is INTEGER
          On entry, the number of errors already detected; used to
          determine if the header should be printed.
          On exit, NERRS is increased by 1.
[in]NOUT
          NOUT is INTEGER
          The unit number on which results are to be printed.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
April 2012

Definition at line 147 of file alaerh.f.

Here is the call graph for this function:

subroutine alaesm ( character*3  PATH,
logical  OK,
integer  NOUT 
)

ALAESM

Purpose: 
 ALAESM prints a summary of results from one of the -ERR- routines.
Parameters:
[in]PATH
          PATH is CHARACTER*3
          The LAPACK path name.
[in]OK
          OK is LOGICAL
          The flag from CHKXER that indicates whether or not the tests
          of error exits passed.
[in]NOUT
          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 64 of file alaesm.f.

subroutine alahd ( integer  IOUNIT,
character*3  PATH 
)

ALAHD

Purpose: 
 ALAHD prints header information for the different test paths.
Parameters:
[in]IOUNIT
          IOUNIT is INTEGER
          The unit number to which the header information should be
          printed.
[in]PATH
          PATH is CHARACTER*3
          The name of the path for which the header information is to
          be printed.  Current paths are
             _GE:  General matrices
             _GB:  General band
             _GT:  General Tridiagonal
             _PO:  Symmetric or Hermitian positive definite
             _PS:  Symmetric or Hermitian positive semi-definite
             _PP:  Symmetric or Hermitian positive definite packed
             _PB:  Symmetric or Hermitian positive definite band
             _PT:  Symmetric or Hermitian positive definite tridiagonal
             _SY:  Symmetric indefinite
             _SP:  Symmetric indefinite packed
             _HE:  (complex) Hermitian indefinite
             _HP:  (complex) Hermitian indefinite packed
             _TR:  Triangular
             _TP:  Triangular packed
             _TB:  Triangular band
             _QR:  QR (general matrices)
             _LQ:  LQ (general matrices)
             _QL:  QL (general matrices)
             _RQ:  RQ (general matrices)
             _QP:  QR with column pivoting
             _TZ:  Trapezoidal
             _LS:  Least Squares driver routines
             _LU:  LU variants
             _CH:  Cholesky variants
             _QS:  QR variants
             _QT:  QRT (general matrices)
             _QX:  QRT (triangular-pentagonal matrices)
          The first character must be one of S, D, C, or Z (C or Z only
          if complex).
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
April 2012

Definition at line 86 of file alahd.f.

Here is the call graph for this function:

subroutine alareq ( character*3  PATH,
integer  NMATS,
logical, dimension( * )  DOTYPE,
integer  NTYPES,
integer  NIN,
integer  NOUT 
)

ALAREQ

Purpose: 
 ALAREQ handles input for the LAPACK test program.  It is called
 to evaluate the input line which requested NMATS matrix types for
 PATH.  The flow of control is as follows:

 If NMATS = NTYPES then
    DOTYPE(1:NTYPES) = .TRUE.
 else
    Read the next input line for NMATS matrix types
    Set DOTYPE(I) = .TRUE. for each valid type I
 endif
Parameters:
[in]PATH
          PATH is CHARACTER*3
          An LAPACK path name for testing.
[in]NMATS
          NMATS is INTEGER
          The number of matrix types to be used in testing this path.
[out]DOTYPE
          DOTYPE is LOGICAL array, dimension (NTYPES)
          The vector of flags indicating if each type will be tested.
[in]NTYPES
          NTYPES is INTEGER
          The maximum number of matrix types for this path.
[in]NIN
          NIN is INTEGER
          The unit number for input.  NIN >= 1.
[in]NOUT
          NOUT is INTEGER
          The unit number for output.  NOUT >= 1.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 91 of file alareq.f.

subroutine alasum ( character*3  TYPE,
integer  NOUT,
integer  NFAIL,
integer  NRUN,
integer  NERRS 
)

ALASUM

Purpose: 
 ALASUM prints a summary of results from one of the -CHK- routines.
Parameters:
[in]TYPE
          TYPE is CHARACTER*3
          The LAPACK path name.
[in]NOUT
          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.
[in]NFAIL
          NFAIL is INTEGER
          The number of tests which did not pass the threshold ratio.
[in]NRUN
          NRUN is INTEGER
          The total number of tests.
[in]NERRS
          NERRS is INTEGER
          The number of error messages recorded.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 74 of file alasum.f.

subroutine alasvm ( character*3  TYPE,
integer  NOUT,
integer  NFAIL,
integer  NRUN,
integer  NERRS 
)

ALASVM

Purpose: 
 ALASVM prints a summary of results from one of the -DRV- routines.
Parameters:
[in]TYPE
          TYPE is CHARACTER*3
          The LAPACK path name.
[in]NOUT
          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.
[in]NFAIL
          NFAIL is INTEGER
          The number of tests which did not pass the threshold ratio.
[in]NRUN
          NRUN is INTEGER
          The total number of tests.
[in]NERRS
          NERRS is INTEGER
          The number of error messages recorded.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 74 of file alasvm.f.

subroutine icopy ( integer  N,
integer, dimension( * )  SX,
integer  INCX,
integer, dimension( * )  SY,
integer  INCY 
)

ICOPY

Purpose: 
 ICOPY copies an integer vector x to an integer vector y.
 Uses unrolled loops for increments equal to 1.
Parameters:
[in]N
          N is INTEGER
          The length of the vectors SX and SY.
[in]SX
          SX is INTEGER array, dimension (1+(N-1)*abs(INCX))
          The vector X.
[in]INCX
          INCX is INTEGER
          The spacing between consecutive elements of SX.
[out]SY
          SY is INTEGER array, dimension (1+(N-1)*abs(INCY))
          The vector Y.
[in]INCY
          INCY is INTEGER
          The spacing between consecutive elements of SY.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 76 of file icopy.f.

Here is the caller graph for this function:

INTEGER function ilaenv ( integer  ISPEC,
character*( * )  NAME,
character*( * )  OPTS,
integer  N1,
integer  N2,
integer  N3,
integer  N4 
)

ILAENV

Purpose: 
 ILAENV returns problem-dependent parameters for the local
 environment.  See ISPEC for a description of the parameters.

 In this version, the problem-dependent parameters are contained in
 the integer array IPARMS in the common block CLAENV and the value
 with index ISPEC is copied to ILAENV.  This version of ILAENV is
 to be used in conjunction with XLAENV in TESTING and TIMING.
Parameters:
[in]ISPEC
          ISPEC is INTEGER
          Specifies the parameter to be returned as the value of
          ILAENV.
          = 1: the optimal blocksize; if this value is 1, an unblocked
               algorithm will give the best performance.
          = 2: the minimum block size for which the block routine
               should be used; if the usable block size is less than
               this value, an unblocked routine should be used.
          = 3: the crossover point (in a block routine, for N less
               than this value, an unblocked routine should be used)
          = 4: the number of shifts, used in the nonsymmetric
               eigenvalue routines
          = 5: the minimum column dimension for blocking to be used;
               rectangular blocks must have dimension at least k by m,
               where k is given by ILAENV(2,...) and m by ILAENV(5,...)
          = 6: the crossover point for the SVD (when reducing an m by n
               matrix to bidiagonal form, if max(m,n)/min(m,n) exceeds
               this value, a QR factorization is used first to reduce
               the matrix to a triangular form.)
          = 7: the number of processors
          = 8: the crossover point for the multishift QR and QZ methods
               for nonsymmetric eigenvalue problems.
          = 9: maximum size of the subproblems at the bottom of the
               computation tree in the divide-and-conquer algorithm
          =10: ieee NaN arithmetic can be trusted not to trap
          =11: infinity arithmetic can be trusted not to trap

          Other specifications (up to 100) can be added later.
[in]NAME
          NAME is CHARACTER*(*)
          The name of the calling subroutine.
[in]OPTS
          OPTS is CHARACTER*(*)
          The character options to the subroutine NAME, concatenated
          into a single character string.  For example, UPLO = 'U',
          TRANS = 'T', and DIAG = 'N' for a triangular routine would
          be specified as OPTS = 'UTN'.
[in]N1
          N1 is INTEGER
[in]N2
          N2 is INTEGER
[in]N3
          N3 is INTEGER
[in]N4
          N4 is INTEGER

          Problem dimensions for the subroutine NAME; these may not all
          be required.
Returns:
ILAENV 
          ILAENV is INTEGER
          >= 0: the value of the parameter specified by ISPEC
          < 0:  if ILAENV = -k, the k-th argument had an illegal value.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011
Further Details: 
  The following conventions have been used when calling ILAENV from the
  LAPACK routines:
  1)  OPTS is a concatenation of all of the character options to
      subroutine NAME, in the same order that they appear in the
      argument list for NAME, even if they are not used in determining
      the value of the parameter specified by ISPEC.
  2)  The problem dimensions N1, N2, N3, N4 are specified in the order
      that they appear in the argument list for NAME.  N1 is used
      first, N2 second, and so on, and unused problem dimensions are
      passed a value of -1.
  3)  The parameter value returned by ILAENV is checked for validity in
      the calling subroutine.  For example, ILAENV is used to retrieve
      the optimal blocksize for STRTRI as follows:

      NB = ILAENV( 1, 'STRTRI', UPLO // DIAG, N, -1, -1, -1 )
      IF( NB.LE.1 ) NB = MAX( 1, N )

Definition at line 150 of file ilaenv.f.

Here is the call graph for this function:

subroutine xlaenv ( integer  ISPEC,
integer  NVALUE 
)

XLAENV

Purpose: 
 XLAENV sets certain machine- and problem-dependent quantities
 which will later be retrieved by ILAENV.
Parameters:
[in]ISPEC
          ISPEC is INTEGER
          Specifies the parameter to be set in the COMMON array IPARMS.
          = 1: the optimal blocksize; if this value is 1, an unblocked
               algorithm will give the best performance.
          = 2: the minimum block size for which the block routine
               should be used; if the usable block size is less than
               this value, an unblocked routine should be used.
          = 3: the crossover point (in a block routine, for N less
               than this value, an unblocked routine should be used)
          = 4: the number of shifts, used in the nonsymmetric
               eigenvalue routines
          = 5: the minimum column dimension for blocking to be used;
               rectangular blocks must have dimension at least k by m,
               where k is given by ILAENV(2,...) and m by ILAENV(5,...)
          = 6: the crossover point for the SVD (when reducing an m by n
               matrix to bidiagonal form, if max(m,n)/min(m,n) exceeds
               this value, a QR factorization is used first to reduce
               the matrix to a triangular form)
          = 7: the number of processors
          = 8: another crossover point, for the multishift QR and QZ
               methods for nonsymmetric eigenvalue problems.
          = 9: maximum size of the subproblems at the bottom of the
               computation tree in the divide-and-conquer algorithm
               (used by xGELSD and xGESDD)
          =10: ieee NaN arithmetic can be trusted not to trap
          =11: infinity arithmetic can be trusted not to trap
[in]NVALUE
          NVALUE is INTEGER
          The value of the parameter specified by ISPEC.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011

Definition at line 79 of file xlaenv.f.