xerbla_array

XERBLA_ARRAY(1)     LAPACK auxiliary routine (version 3.0)     XERBLA_ARRAY(1)



NAME
       XERBLA_ARRAY - assists other languages in calling XERBLA, the LAPACK
       and BLAS error handler

SYNOPSIS
       SUBROUTINE XERBLA_ARRAY(SRNAME_ARRAY, SRNAME_LEN, INFO)

           IMPLICIT                          NONE

           INTEGER                           SRNAME_LEN, INFO

           CHARACTER(1)                      SRNAME_ARRAY(SRNAME_LEN)

PURPOSE
       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.

ARGUMENTS
       SRNAME_ARRAY (input) CHARACTER(1) array, dimension (SRNAME_LEN) The
       name of the routine which called XERBLA_ARRAY.  SRNAME_LEN (input)
       INTEGER The length of the name in SRNAME_ARRAY.

       INFO    (input) INTEGER
               The position of the invalid parameter in the parameter list of
               the calling routine.



 LAPACK auxiliary routine (versioNovember 2008                 XERBLA_ARRAY(1)