aux_eig(3) aux

Functions


subroutine alahdg (IOUNIT, PATH)
ALAHDG
subroutine alareq (PATH, NMATS, DOTYPE, NTYPES, NIN, NOUT)
ALAREQ
subroutine alarqg (PATH, NMATS, DOTYPE, NTYPES, NIN, NOUT)
ALARQG
subroutine alasmg (TYPE, NOUT, NFAIL, NRUN, NERRS)
ALASMG
subroutine alasum (TYPE, NOUT, NFAIL, NRUN, NERRS)
ALASUM
subroutine alasvm (TYPE, NOUT, NFAIL, NRUN, NERRS)
ALASVM
integer function ilaenv (ISPEC, NAME, OPTS, N1, N2, N3, N4)
ILAENV
subroutine xerbla (SRNAME, INFO)
XERBLA
subroutine xlaenv (ISPEC, NVALUE)
XLAENV

Detailed Description

This is the group of auxiliary LAPACK TESTING EIG routines.

Function Documentation

subroutine alahdg (integer IOUNIT, character*3 PATH)

ALAHDG

Purpose: 

 ALAHDG prints header information for the different test paths.


 

Parameters:

IOUNIT 

          IOUNIT is INTEGER
          The unit number to which the header information should be
          printed.


PATH 

          PATH is CHARACTER*3
          The name of the path for which the header information is to
          be printed.  Current paths are
             GQR:  GQR (general matrices)
             GRQ:  GRQ (general matrices)
             LSE:  LSE Problem
             GLM:  GLM Problem
             GSV:  Generalized Singular Value Decomposition
             CSD:  CS Decomposition


 

Author:

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date:

November 2011

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:

PATH 

          PATH is CHARACTER*3
          An LAPACK path name for testing.


NMATS 

          NMATS is INTEGER
          The number of matrix types to be used in testing this path.


DOTYPE 

          DOTYPE is LOGICAL array, dimension (NTYPES)
          The vector of flags indicating if each type will be tested.


NTYPES 

          NTYPES is INTEGER
          The maximum number of matrix types for this path.


NIN 

          NIN is INTEGER
          The unit number for input.  NIN >= 1.


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

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

ALARQG

Purpose: 

 ALARQG 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:

PATH 

          PATH is CHARACTER*3
          An LAPACK path name for testing.


NMATS 

          NMATS is INTEGER
          The number of matrix types to be used in testing this path.


DOTYPE 

          DOTYPE is LOGICAL array, dimension (NTYPES)
          The vector of flags indicating if each type will be tested.


NTYPES 

          NTYPES is INTEGER
          The maximum number of matrix types for this path.


NIN 

          NIN is INTEGER
          The unit number for input.  NIN >= 1.


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

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

ALASMG

Purpose: 

 ALASMG prints a summary of results from one of the -CHK- routines.


 

Parameters:

TYPE 

          TYPE is CHARACTER*3
          The LAPACK path name.


NOUT 

          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.


NFAIL 

          NFAIL is INTEGER
          The number of tests which did not pass the threshold ratio.


NRUN 

          NRUN is INTEGER
          The total number of tests.


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

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:

TYPE 

          TYPE is CHARACTER*3
          The LAPACK path name.


NOUT 

          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.


NFAIL 

          NFAIL is INTEGER
          The number of tests which did not pass the threshold ratio.


NRUN 

          NRUN is INTEGER
          The total number of tests.


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

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:

TYPE 

          TYPE is CHARACTER*3
          The LAPACK path name.


NOUT 

          NOUT is INTEGER
          The unit number on which results are to be printed.
          NOUT >= 0.


NFAIL 

          NFAIL is INTEGER
          The number of tests which did not pass the threshold ratio.


NRUN 

          NRUN is INTEGER
          The total number of tests.


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

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:

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
          12 <= ISPEC <= 16:
               xHSEQR or one of its subroutines,
               see IPARMQ for detailed explanation
          Other specifications (up to 100) can be added later.


NAME 

          NAME is CHARACTER*(*)
          The name of the calling subroutine.


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'.


N1 

          N1 is INTEGER


N2 

          N2 is INTEGER


N3 

          N3 is INTEGER


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 )


 

subroutine xerbla (character*(*) SRNAME, integer INFO)

XERBLA

Purpose: 

 This is a special version of XERBLA to be used only as part of
 the test program for testing error exits from the LAPACK routines.
 Error messages are printed if INFO.NE.INFOT or if SRNAME.NE.SRNAMT,
 where INFOT and SRNAMT are values stored in COMMON.


 

Parameters:

SRNAME 

          SRNAME is CHARACTER*(*)
          The name of the subroutine calling XERBLA.  This name should
          match the COMMON variable SRNAMT.


INFO 

          INFO is INTEGER
          The error return code from the calling subroutine.  INFO
          should equal the COMMON variable INFOT.


 

Author:

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date:

November 2011

Further Details: 

  The following variables are passed via the common blocks INFOC and
  SRNAMC:
  INFOT   INTEGER      Expected integer return code
  NOUT    INTEGER      Unit number for printing error messages
  OK      LOGICAL      Set to .TRUE. if INFO = INFOT and
                       SRNAME = SRNAMT, otherwise set to .FALSE.
  LERR    LOGICAL      Set to .TRUE., indicating that XERBLA was called
  SRNAMT  CHARACTER*(*) Expected name of calling subroutine


 

subroutine xlaenv (integer ISPEC, integer NVALUE)

XLAENV

Purpose: 

 XLAENV sets certain machine- and problem-dependent quantities
 which will later be retrieved by ILAENV.


 

Parameters:

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
          12 <= ISPEC <= 16:
               xHSEQR or one of its subroutines,
               see IPARMQ for detailed explanation


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

Author

Generated automatically by Doxygen for LAPACK from the source code.

LAST SEARCHED