aux_blas(3)

NAME
aux_blas - Auxiliary BLAS

SYNOPSIS

  Functions
integer function icamax (n, cx, incx)
ICAMAX
integer function idamax (n, dx, incx)
IDAMAX
integer function isamax (n, sx, incx)
ISAMAX
integer function izamax (n, zx, incx)
IZAMAX
logical function lsame (ca, cb)
LSAME
subroutine xerbla (srname, info)
XERBLA
subroutine xerbla_array (srname_array, srname_len, info)
XERBLA_ARRAY

Detailed Description

This is the group of Auxiliary 3 BLAS routines.

Function Documentation

  integer function icamax (integer n, complex, dimension(*) cx, integer incx)

ICAMAX

Purpose:

        ICAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|

Parameters
    N

              N is INTEGER
             number of elements in input vector(s)

    CX

              CX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) )

    INCX

              INCX is INTEGER
             storage spacing between elements of CX

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Further Details:

         jack dongarra, linpack, 3/11/78.
         modified 3/93 to return if incx .le. 0.
         modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 70 of file icamax.f.

  integer function idamax (integer n, double precision, dimension(*) dx, integer incx)

IDAMAX

Purpose:

        IDAMAX finds the index of the first element having maximum absolute value.

Parameters
    N

              N is INTEGER
             number of elements in input vector(s)

    DX

              DX is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCX ) )

    INCX

              INCX is INTEGER
             storage spacing between elements of DX

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Further Details:

         jack dongarra, linpack, 3/11/78.
         modified 3/93 to return if incx .le. 0.
         modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 70 of file idamax.f.

  integer function isamax (integer n, real, dimension(*) sx, integer incx)

ISAMAX

Purpose:

        ISAMAX finds the index of the first element having maximum absolute value.

Parameters
    N

              N is INTEGER
             number of elements in input vector(s)

    SX

              SX is REAL array, dimension ( 1 + ( N - 1 )*abs( INCX ) )

    INCX

              INCX is INTEGER
             storage spacing between elements of SX

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Further Details:

         jack dongarra, linpack, 3/11/78.
         modified 3/93 to return if incx .le. 0.
         modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 70 of file isamax.f.

  integer function izamax (integer n, complex*16, dimension(*) zx, integer incx)

IZAMAX

Purpose:

        IZAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|

Parameters
    N

              N is INTEGER
             number of elements in input vector(s)

    ZX

              ZX is COMPLEX*16 array, dimension ( 1 + ( N - 1 )*abs( INCX ) )

    INCX

              INCX is INTEGER
             storage spacing between elements of ZX

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Further Details:

         jack dongarra, 1/15/85.
         modified 3/93 to return if incx .le. 0.
         modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 70 of file izamax.f.

  logical function lsame (character ca, character cb)

LSAME

Purpose:

     LSAME returns .TRUE. if CA is the same letter as CB regardless of
     case.

Parameters
    CA

              CA is CHARACTER*1

    CB

              CB is CHARACTER*1
              CA and CB specify the single characters to be compared.

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Definition at line 52 of file lsame.f.

  subroutine xerbla (character*(*) srname, integer info)

XERBLA

Purpose:

     XERBLA  is an error handler for the LAPACK routines.
     It is called by an LAPACK routine if an input parameter has an
     invalid value.  A message is printed and execution stops.
     Installers may consider modifying the STOP statement in order to
     call system-specific exception-handling facilities.

Parameters
    SRNAME

              SRNAME is CHARACTER*(*)
              The name of the routine which called XERBLA.

    INFO

              INFO is INTEGER
              The position of the invalid parameter in the parameter list
              of the calling routine.

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Definition at line 59 of file BLAS/SRC/xerbla.f.

  subroutine xerbla_array (character(1), dimension(srname_len) srname_array, integer srname_len, integer info)

XERBLA_ARRAY

Purpose:

     XERBLA_ARRAY assists other languages in calling XERBLA, the LAPACK
     and BLAS error handler.  Rather than taking a Fortran string argument
     as the function's name, XERBLA_ARRAY takes an array of single
     characters along with the array's length.  XERBLA_ARRAY then copies
     up to 32 characters of that array into a Fortran string and passes
     that to XERBLA.  If called with a non-positive SRNAME_LEN,
     XERBLA_ARRAY will call XERBLA with a string of all blank characters.
     Say some macro or other device makes XERBLA_ARRAY available to C99
     by a name lapack_xerbla and with a common Fortran calling convention.
     Then a C99 program could invoke XERBLA via:
        {
          int flen = strlen(__func__);
          lapack_xerbla(__func__, &flen, &info);
        }
     Providing XERBLA_ARRAY is not necessary for intercepting LAPACK
     errors.  XERBLA_ARRAY calls XERBLA.

Parameters
    SRNAME_ARRAY

              SRNAME_ARRAY is CHARACTER(1) array, dimension (SRNAME_LEN)
              The name of the routine which called XERBLA_ARRAY.

    SRNAME_LEN

              SRNAME_LEN is INTEGER
              The length of the name in SRNAME_ARRAY.

    INFO

              INFO is INTEGER
              The position of the invalid parameter in the parameter list
              of the calling routine.

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Definition at line 79 of file BLAS/SRC/xerbla_array.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.