la_blas_aux Module Reference

Functions/Subroutines
pure real(dp) function, public	la_dcabs1 (z)
	DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.
pure integer(ilp) function, public	la_isamax (n, sx, incx)
	ISAMAX: finds the index of the first element having maximum absolute value.
pure integer(ilp) function, public	la_izamax (n, zx, incx)
	IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure logical(lk) function, public	la_lsame (ca, cb)
	LSAME: returns .TRUE. if CA is the same letter as CB regardless of case.
pure real(sp) function, public	la_scabs1 (z)
	SCABS1: computes |Re(.)| + |Im(.)| of a complex number.
pure subroutine, public	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_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_qcabs1 (z)
	DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.
pure integer(ilp) function, public	la_iqamax (n, dx, incx)
	IDAMAX: finds the index of the first element having maximum absolute value.
pure integer(ilp) function, public	la_iwamax (n, zx, incx)
	IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure integer(ilp) function, public	la_icamax (n, cx, incx)
	ICAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.
pure integer(ilp) function, public	la_idamax (n, dx, incx)
	IDAMAX: finds the index of the first element having maximum absolute value.

Function/Subroutine Documentation

la_dcabs1()

pure real(dp) function, public la_blas_aux::la_dcabs1

(

complex(dp), intent(in)

z

)

DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.

Here is the call graph for this function:

la_icamax()

pure integer(ilp) function, public la_blas_aux::la_icamax	(	integer(ilp), intent(in)	n,
		complex(sp), dimension(*), intent(in)	cx,
		integer(ilp), intent(in)	incx )

ICAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.

Here is the call graph for this function:

la_idamax()

pure integer(ilp) function, public la_blas_aux::la_idamax	(	integer(ilp), intent(in)	n,
		real(dp), dimension(*), intent(in)	dx,
		integer(ilp), intent(in)	incx )

IDAMAX: finds the index of the first element having maximum absolute value.

Here is the call graph for this function:

la_iqamax()

pure integer(ilp) function, public la_blas_aux::la_iqamax	(	integer(ilp), intent(in)	n,
		real(qp), dimension(*), intent(in)	dx,
		integer(ilp), intent(in)	incx )

IDAMAX: finds the index of the first element having maximum absolute value.

Here is the call graph for this function:

la_isamax()

pure integer(ilp) function, public la_blas_aux::la_isamax	(	integer(ilp), intent(in)	n,
		real(sp), dimension(*), intent(in)	sx,
		integer(ilp), intent(in)	incx )

ISAMAX: finds the index of the first element having maximum absolute value.

Here is the call graph for this function:

la_iwamax()

pure integer(ilp) function, public la_blas_aux::la_iwamax	(	integer(ilp), intent(in)	n,
		complex(qp), dimension(*), intent(in)	zx,
		integer(ilp), intent(in)	incx )

IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.

Here is the call graph for this function:

la_izamax()

pure integer(ilp) function, public la_blas_aux::la_izamax	(	integer(ilp), intent(in)	n,
		complex(dp), dimension(*), intent(in)	zx,
		integer(ilp), intent(in)	incx )

IZAMAX: finds the index of the first element having maximum |Re(.)| + |Im(.)|.

Here is the call graph for this function:

la_lsame()

pure logical(lk) function, public la_blas_aux::la_lsame	(	character, intent(in)	ca,
		character, intent(in)	cb )

LSAME: returns .TRUE. if CA is the same letter as CB regardless of case.

Here is the call graph for this function:

la_qcabs1()

pure real(qp) function, public la_blas_aux::la_qcabs1

(

complex(qp), intent(in)

z

)

DCABS1: computes |Re(.)| + |Im(.)| of a double complex number.

Here is the call graph for this function:

la_scabs1()

pure real(sp) function, public la_blas_aux::la_scabs1

(

complex(sp), intent(in)

z

)

SCABS1: computes |Re(.)| + |Im(.)| of a complex number.

Here is the call graph for this function:

la_xerbla()

pure subroutine, public la_blas_aux::la_xerbla	(	character(len=*), intent(in)	srname,
		integer(ilp), intent(in)	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.

la_xerbla_array()

pure subroutine, public la_blas_aux::la_xerbla_array	(	character(1), dimension(srname_len), intent(in)	srname_array,
		integer(ilp), intent(in)	srname_len,
		integer(ilp), intent(in)	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.

Here is the call graph for this function: