Diff for /rpl/lapack/blas/xerbla.f between versions 1.1 and 1.14

version 1.1, 2010/01/26 15:22:45 version 1.14, 2023/08/07 08:38:44
Line 1 Line 1
       SUBROUTINE XERBLA( SRNAME, INFO )  *> \brief \b XERBLA
 *  
 *  -- LAPACK auxiliary routine (preliminary version) --  
 *     Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..  
 *     November 2006  
 *  *
 *     .. Scalar Arguments ..  *  =========== DOCUMENTATION ===========
       CHARACTER*(*)      SRNAME  
       INTEGER            INFO  
 *     ..  
 *  *
 *  Purpose  * Online html documentation available at
 *  =======  *            http://www.netlib.org/lapack/explore-html/
 *  *
 *  XERBLA  is an error handler for the LAPACK routines.  *  Definition:
 *  It is called by an LAPACK routine if an input parameter has an  *  ===========
 *  invalid value.  A message is printed and execution stops.  *
   *       SUBROUTINE XERBLA( SRNAME, INFO )
   *
   *       .. Scalar Arguments ..
   *       CHARACTER*(*)      SRNAME
   *       INTEGER            INFO
   *       ..
   *
   *
   *> \par Purpose:
   *  =============
   *>
   *> \verbatim
   *>
   *> 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.
   *> \endverbatim
   *
   *  Arguments:
   *  ==========
   *
   *> \param[in] SRNAME
   *> \verbatim
   *>          SRNAME is CHARACTER*(*)
   *>          The name of the routine which called XERBLA.
   *> \endverbatim
   *>
   *> \param[in] INFO
   *> \verbatim
   *>          INFO is INTEGER
   *>          The position of the invalid parameter in the parameter list
   *>          of the calling routine.
   *> \endverbatim
   *
   *  Authors:
   *  ========
   *
   *> \author Univ. of Tennessee
   *> \author Univ. of California Berkeley
   *> \author Univ. of Colorado Denver
   *> \author NAG Ltd.
 *  *
 *  Installers may consider modifying the STOP statement in order to  *> \ingroup aux_blas
 *  call system-specific exception-handling facilities.  
 *  *
 *  Arguments  *  =====================================================================
 *  =========        SUBROUTINE XERBLA( SRNAME, INFO )
 *  *
 *  SRNAME  (input) CHARACTER*(*)  *  -- Reference BLAS level1 routine --
 *          The name of the routine which called XERBLA.  *  -- Reference BLAS is a software package provided by Univ. of Tennessee,    --
   *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
 *  *
 *  INFO    (input) INTEGER  *     .. Scalar Arguments ..
 *          The position of the invalid parameter in the parameter list        CHARACTER*(*)      SRNAME
 *          of the calling routine.        INTEGER            INFO
   *     ..
 *  *
 * =====================================================================  * =====================================================================
 *  *

Removed from v.1.1  
changed lines
  Added in v.1.14


CVSweb interface <joel.bertrand@systella.fr>