8.6.0.1. BLAS: Extra/Miscellaneous Functions
(packages/blas/blas-x.lsh)

Author(s): Fu Jie Huang, Yann LeCun

This provides a complete interface to the FORTRAN BLAS library of low-level linear algebra functions.

8.6.0.1.0. (xerbla srname info )
(packages/blas/blas-x.lsh)


*  =====================================================================
*  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.
*
*  Arguments
*  =========
*
*  SRNAME  (input) CHARACTER*6
*          The name of the routine which called XERBLA.
*
*  INFO    (input) INTEGER
*          The position of the invalid parameter in the parameter list
*          of the calling routine.
*
*
*  =====================================================================


8.6.0.1.1. (isamax n sx incx )
(packages/blas/blas-x.lsh)


*  =====================================================================
*
*     finds the index of element having max. absolute value.
*     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(*)
*
*  =====================================================================


8.6.0.1.2. (idamax n dx incx )
(packages/blas/blas-x.lsh)


*  =====================================================================
*
*     finds the index of element having max. absolute value.
*     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(*)
*
*  =====================================================================


8.6.0.1.3. (icamax n cx incx )
(packages/blas/blas-x.lsh)


*  =====================================================================
*
*     finds the index of element having max. absolute value.
*     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(*)
*
*  =====================================================================


8.6.0.1.4. (izamax n zx incx )
(packages/blas/blas-x.lsh)


*  =====================================================================
*
*     finds the index of element having max. absolute value.
*     jack dongarra, 1/15/85.
*     modified 3/93 to return if incx .le. 0.
*     modified 12/3/93, array(1) declarations changed to array(*)
*
*  =====================================================================