.TH "aux_blas" 3 "Sat Aug 1 2020" "Version 3.9.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
aux_blas
.SH SYNOPSIS
.br
.PP
.SS "Functions"

.in +1c
.ti -1c
.RI "integer function \fBicamax\fP (N, CX, INCX)"
.br
.RI "\fBICAMAX\fP "
.ti -1c
.RI "integer function \fBidamax\fP (N, DX, INCX)"
.br
.RI "\fBIDAMAX\fP "
.ti -1c
.RI "integer function \fBisamax\fP (N, SX, INCX)"
.br
.RI "\fBISAMAX\fP "
.ti -1c
.RI "integer function \fBizamax\fP (N, ZX, INCX)"
.br
.RI "\fBIZAMAX\fP "
.ti -1c
.RI "logical function \fBlsame\fP (CA, CB)"
.br
.RI "\fBLSAME\fP "
.ti -1c
.RI "subroutine \fBxerbla\fP (SRNAME, INFO)"
.br
.RI "\fBXERBLA\fP "
.ti -1c
.RI "subroutine \fBxerbla_array\fP (SRNAME_ARRAY, SRNAME_LEN, INFO)"
.br
.RI "\fBXERBLA_ARRAY\fP "
.in -1c
.SH "Detailed Description"
.PP 
This is the group of Auxiliary 3 BLAS routines\&. 
.SH "Function Documentation"
.PP 
.SS "integer function icamax (integer N, complex, dimension(*) CX, integer INCX)"

.PP
\fBICAMAX\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
    ICAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIN\fP 
.PP
.nf
          N is INTEGER
         number of elements in input vector(s)
.fi
.PP
.br
\fICX\fP 
.PP
.nf
          CX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
.fi
.PP
.br
\fIINCX\fP 
.PP
.nf
          INCX is INTEGER
         storage spacing between elements of CX
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
November 2017 
.RE
.PP
\fBFurther Details:\fP
.RS 4

.PP
.nf
     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(*)
.fi
.PP
 
.RE
.PP

.SS "integer function idamax (integer N, double precision, dimension(*) DX, integer INCX)"

.PP
\fBIDAMAX\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
    IDAMAX finds the index of the first element having maximum absolute value.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIN\fP 
.PP
.nf
          N is INTEGER
         number of elements in input vector(s)
.fi
.PP
.br
\fIDX\fP 
.PP
.nf
          DX is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
.fi
.PP
.br
\fIINCX\fP 
.PP
.nf
          INCX is INTEGER
         storage spacing between elements of DX
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
November 2017 
.RE
.PP
\fBFurther Details:\fP
.RS 4

.PP
.nf
     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(*)
.fi
.PP
 
.RE
.PP

.SS "integer function isamax (integer N, real, dimension(*) SX, integer INCX)"

.PP
\fBISAMAX\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
    ISAMAX finds the index of the first element having maximum absolute value.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIN\fP 
.PP
.nf
          N is INTEGER
         number of elements in input vector(s)
.fi
.PP
.br
\fISX\fP 
.PP
.nf
          SX is REAL array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
.fi
.PP
.br
\fIINCX\fP 
.PP
.nf
          INCX is INTEGER
         storage spacing between elements of SX
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
November 2017 
.RE
.PP
\fBFurther Details:\fP
.RS 4

.PP
.nf
     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(*)
.fi
.PP
 
.RE
.PP

.SS "integer function izamax (integer N, complex*16, dimension(*) ZX, integer INCX)"

.PP
\fBIZAMAX\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
    IZAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIN\fP 
.PP
.nf
          N is INTEGER
         number of elements in input vector(s)
.fi
.PP
.br
\fIZX\fP 
.PP
.nf
          ZX is COMPLEX*16 array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
.fi
.PP
.br
\fIINCX\fP 
.PP
.nf
          INCX is INTEGER
         storage spacing between elements of ZX
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
November 2017 
.RE
.PP
\fBFurther Details:\fP
.RS 4

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

.SS "logical function lsame (character CA, character CB)"

.PP
\fBLSAME\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 LSAME returns .TRUE. if CA is the same letter as CB regardless of
 case.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fICA\fP 
.PP
.nf
          CA is CHARACTER*1
.fi
.PP
.br
\fICB\fP 
.PP
.nf
          CB is CHARACTER*1
          CA and CB specify the single characters to be compared.
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
December 2016 
.RE
.PP

.SS "subroutine xerbla (character*(*) SRNAME, integer INFO)"

.PP
\fBXERBLA\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 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.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fISRNAME\fP 
.PP
.nf
          SRNAME is CHARACTER*(*)
          The name of the routine which called XERBLA.
.fi
.PP
.br
\fIINFO\fP 
.PP
.nf
          INFO is INTEGER
          The position of the invalid parameter in the parameter list
          of the calling routine.
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
December 2016 
.RE
.PP

.SS "subroutine xerbla_array (character(1), dimension(srname_len) SRNAME_ARRAY, integer SRNAME_LEN, integer INFO)"

.PP
\fBXERBLA_ARRAY\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 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.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fISRNAME_ARRAY\fP 
.PP
.nf
          SRNAME_ARRAY is CHARACTER(1) array, dimension (SRNAME_LEN)
          The name of the routine which called XERBLA_ARRAY.
.fi
.PP
.br
\fISRNAME_LEN\fP 
.PP
.nf
          SRNAME_LEN is INTEGER
          The length of the name in SRNAME_ARRAY.
.fi
.PP
.br
\fIINFO\fP 
.PP
.nf
          INFO is INTEGER
          The position of the invalid parameter in the parameter list
          of the calling routine.
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP
\fBDate\fP
.RS 4
December 2016 
.RE
.PP

.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.