la_blas_aux.f90 File Reference

Modules
module	la_blas_aux

Functions/Subroutines
pure real(dp) function, public	la_blas_aux::la_dcabs1 (z)
	DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.
pure integer(ilp) function, public	la_blas_aux::la_isamax (n, sx, incx)
	ISAMAX: finds the index of the first element having maximum absolute value.
pure integer(ilp) function, public	la_blas_aux::la_izamax (n, zx, incx)
	IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure logical(lk) function, public	la_blas_aux::la_lsame (ca, cb)
	LSAME: returns .TRUE. if CA is the same letter as CB regardless of case.
pure real(sp) function, public	la_blas_aux::la_scabs1 (z)
	SCABS1: computes |Re(.)| + |Im(.)| of a complex number.
pure subroutine, public	la_blas_aux::la_xerbla (srname, info)
	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.
pure subroutine, public	la_blas_aux::la_xerbla_array (srname_array, srname_len, info)
	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, } Providing XERBLA_ARRAY is not necessary for intercepting LAPACK errors. XERBLA_ARRAY calls XERBLA.
pure real(qp) function, public	la_blas_aux::la_qcabs1 (z)
	DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.
pure integer(ilp) function, public	la_blas_aux::la_iqamax (n, dx, incx)
	IDAMAX: finds the index of the first element having maximum absolute value.
pure integer(ilp) function, public	la_blas_aux::la_iwamax (n, zx, incx)
	IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure integer(ilp) function, public	la_blas_aux::la_icamax (n, cx, incx)
	ICAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure integer(ilp) function, public	la_blas_aux::la_idamax (n, dx, incx)
	IDAMAX: finds the index of the first element having maximum absolute value.