xerbla_array(3f) - [BLAS:AUX_BLAS] call XERBLA(3f) with an array of characters instead of a string
Synopsis
Definition
Options
Authors
See Also
subroutine xerbla_array(srname_array, srname_len, info)
.. Scalar Arguments .. integer srname_len, info .. .. Array Arguments .. character(*) srname_array(srname_len) ..
XERBLA_ARRAY assists other languages in calling XERBLA, the LAPACK and BLAS error handler. Rather than taking a Fortran string argument as the functions name, XERBLA_ARRAY takes an array of single characters along with the arrays 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.
SRNAME_ARRAY is CHARACTER(*) array, dimension (SRNAME_LEN) The name of the routine which called XERBLA_ARRAY.
SRNAME_LEN is INTEGER The length of the name in SRNAME_ARRAY.
INFO is INTEGER The position of the invalid parameter in the parameter list of the calling routine.
o Univ. of Tennessee o Univ. of California Berkeley o Univ. of Colorado Denver o NAG Ltd. date:December 2016
Online html documentation available at http://www.netlib.org/lapack/explore-html/
Nemo Release 3.1 | xerbla_array (3) | February 23, 2025 |