---
name: "xerbla_array"
section: "3lapack"
platform: "linux"
package: "liblapack-doc"
version: "3.2.1-8"
release: "Debian 6.0 (Squeeze)"
platforms: ["linux"]
url: "https://new.carta.tech/xerbla_array/3lapack"
---

# xerbla\_array(3lapack)

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

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