Diff for /rpl/lapack/blas/xerbla.f between versions 1.6 and 1.7

version 1.6, 2010/12/21 13:51:26 version 1.7, 2011/11/21 20:37:08
Line 1 Line 1
       SUBROUTINE XERBLA( SRNAME, INFO )  *> \brief \b XERBLA
 *  *
 *  -- LAPACK auxiliary routine (preliminary version) --  *  =========== DOCUMENTATION ===========
 *     Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..  
 *     November 2006  
 *  *
 *     .. Scalar Arguments ..  * Online html documentation available at 
       CHARACTER*(*)      SRNAME  *            http://www.netlib.org/lapack/explore-html/ 
       INTEGER            INFO  
 *     ..  
 *  *
 *  Purpose  *  Definition:
 *  =======  *  ===========
   *
   *       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. 
 *  *
 *  XERBLA  is an error handler for the LAPACK routines.  *> \date November 2011
 *  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  *> \ingroup aux_blas
 *  call system-specific exception-handling facilities.  
 *  *
 *  Arguments  *  =====================================================================
 *  =========        SUBROUTINE XERBLA( SRNAME, INFO )
 *  *
 *  SRNAME  (input) CHARACTER*(*)  *  -- Reference BLAS level1 routine (version 3.4.0) --
 *          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..--
   *     November 2011
 *  *
 *  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.6  
changed lines
  Added in v.1.7


CVSweb interface <joel.bertrand@systella.fr>