|
GBTOlib: library for evaluation of molecular integrals in mixed Gaussian / B-spline basis 111
|
Interface for LAPACK dsyevr routine and its quad precision implementation. More...
Public Member Functions | |
| subroutine | dble_syevr (jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info) |
| subroutine | quad_syevr (jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info) |
Interface for LAPACK dsyevr routine and its quad precision implementation.
| subroutine blas_lapack_gbl::syevr::dble_syevr | ( | character | jobz, |
| character | range, | ||
| character | uplo, | ||
| integer(blasint) | n, | ||
| real(kind=wp), dimension(lda,*) | a, | ||
| integer(blasint) | lda, | ||
| real(kind=wp) | vl, | ||
| real(kind=wp) | vu, | ||
| integer(blasint) | il, | ||
| integer(blasint) | iu, | ||
| real(kind=wp) | abstol, | ||
| integer(blasint) | m, | ||
| real(kind=wp), dimension(*) | w, | ||
| real(kind=wp), dimension(ldz,*) | z, | ||
| integer(blasint) | ldz, | ||
| integer(blasint), dimension(*) | isuppz, | ||
| real(kind=wp), dimension(*) | work, | ||
| integer(blasint) | lwork, | ||
| integer(blasint), dimension(*) | iwork, | ||
| integer(blasint) | liwork, | ||
| integer(blasint) | info ) |
| subroutine blas_lapack_gbl::syevr::quad_syevr | ( | character | jobz, |
| character | range, | ||
| character | uplo, | ||
| integer(blasint) | n, | ||
| real(kind=ep1), dimension(:,:) | a, | ||
| integer(blasint) | lda, | ||
| real(kind=ep1) | vl, | ||
| real(kind=ep1) | vu, | ||
| integer(blasint) | il, | ||
| integer(blasint) | iu, | ||
| real(kind=ep1) | abstol, | ||
| integer(blasint) | m, | ||
| real(kind=ep1), dimension(:) | w, | ||
| real(kind=ep1), dimension(:,:) | z, | ||
| integer(blasint) | ldz, | ||
| integer(blasint), dimension(:) | isuppz, | ||
| real(kind=ep1), dimension(:) | work, | ||
| integer(blasint) | lwork, | ||
| integer(blasint), dimension(:) | iwork, | ||
| integer(blasint) | liwork, | ||
| integer(blasint) | info ) |