Provided by: liblapack-doc_3.7.1-4ubuntu1_all

**NAME**

aux_blas

**SYNOPSIS**

Functionsinteger functionicamax(N, CX, INCX)ICAMAXinteger functionidamax(N, DX, INCX)IDAMAXinteger functionisamax(N, SX, INCX)ISAMAXinteger functionizamax(N, ZX, INCX)IZAMAXlogical functionlsame(CA, CB)LSAMEsubroutinexerbla(SRNAME, INFO)XERBLAsubroutinexerbla_array(SRNAME_ARRAY, SRNAME_LEN, INFO)XERBLA_ARRAY

**Detailed** **Description**

This is the group of Auxiliary 3 BLAS routines.

**Function** **Documentation**

integerfunctionicamax(integerN,complex,dimension(*)CX,integerINCX)ICAMAXPurpose:ICAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|Parameters:NN is INTEGER number of elements in input vector(s)CXCX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) )INCXINCX is INTEGER storage spacing between elements of SXAuthor:Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd.Date:December 2016FurtherDetails: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(*)integerfunctionidamax(integerN,doubleprecision,dimension(*)DX,integerINCX)IDAMAXPurpose:IDAMAX finds the index of the first element having maximum absolute value.Parameters:NN is INTEGER number of elements in input vector(s)DXDX is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCX ) )INCXINCX is INTEGER storage spacing between elements of SXAuthor:Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd.Date:December 2016FurtherDetails: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(*)integerfunctionisamax(integerN,real,dimension(*)SX,integerINCX)ISAMAXPurpose:ISAMAX finds the index of the first element having maximum absolute value.Parameters:NN is INTEGER number of elements in input vector(s)SXSX is REAL array, dimension ( 1 + ( N - 1 )*abs( INCX ) )INCXINCX is INTEGER storage spacing between elements of SXAuthor:Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd.Date:December 2016FurtherDetails: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(*)integerfunctionizamax(integerN,complex*16,dimension(*)ZX,integerINCX)IZAMAXPurpose:IZAMAX finds the index of the first element having maximum |Re(.)| + |Im(.)|Parameters:NN is INTEGER number of elements in input vector(s)ZXZX is COMPLEX*16 array, dimension ( 1 + ( N - 1 )*abs( INCX ) )INCXINCX is INTEGER storage spacing between elements of SXAuthor:Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd.Date:December 2016FurtherDetails:jack dongarra, 1/15/85. modified 3/93 to return if incx .le. 0. modified 12/3/93, array(1) declarations changed to array(*)logicalfunctionlsame(characterCA,characterCB)LSAMEPurpose:LSAME returns .TRUE. if CA is the same letter as CB regardless of case.Parameters:CACA is CHARACTER*1CBCB 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.Date:December 2016subroutinexerbla(character*(*)SRNAME,integerINFO)XERBLAPurpose: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:SRNAMESRNAME is CHARACTER*(*) The name of the routine which called XERBLA.INFOINFO 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.Date:December 2016subroutinexerbla_array(character(1),dimension(srname_len)SRNAME_ARRAY,integerSRNAME_LEN,integerINFO)XERBLA_ARRAYPurpose: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_ARRAYSRNAME_ARRAY is CHARACTER(1) array, dimension (SRNAME_LEN) The name of the routine which called XERBLA_ARRAY.SRNAME_LENSRNAME_LEN is INTEGER The length of the name in SRNAME_ARRAY.INFOINFO 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.Date:December 2016

**Author**

Generated automatically by Doxygen for LAPACK from the source code.