.TH "aux_blas" 3 "Sun Nov 27 2022" "Version 3.11.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
aux_blas \- Auxiliary 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
\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
\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
\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
\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

.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

.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

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