#include "../general/sanity.F90"
#include "../general/error_checking.inc"
#include "../../src/general/precision_kinds.F90"
|
| subroutine | solve_tridi_PRECISION_AND_SUFFIX (obj, na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_all, mpi_comm_rows, mpi_comm_cols, useGPU, wantDebug, success, max_threads) |
| |
| subroutine | solve_tridi_col_PRECISION_AND_SUFFIX (obj, na, nev, nqoff, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, useGPU, wantDebug, success, max_threads) |
| |
| subroutine | solve_tridi_single_problem_PRECISION_AND_SUFFIX (obj, nlen, d, e, q, ldq, wantDebug, success) |
| |
◆ solve_tridi_col_PRECISION_AND_SUFFIX()
| subroutine solve_tridi_col_PRECISION_AND_SUFFIX |
( |
class(elpa_abstract_impl_t), intent(inout) |
obj, |
|
|
integer(kind=ik) |
na, |
|
|
integer(kind=ik) |
nev, |
|
|
integer(kind=ik) |
nqoff, |
|
|
real(kind=real_datatype), dimension(na) |
d, |
|
|
real(kind=real_datatype), dimension(na) |
e, |
|
|
real(kind=real_datatype), dimension(ldq,matrixcols) |
q, |
|
|
integer(kind=ik) |
ldq, |
|
|
integer(kind=ik) |
nblk, |
|
|
integer(kind=ik) |
matrixCols, |
|
|
integer(kind=ik) |
mpi_comm_rows, |
|
|
logical, intent(in) |
useGPU, |
|
|
logical, intent(in) |
wantDebug, |
|
|
logical, intent(out) |
success, |
|
|
integer(kind=ik), intent(in) |
max_threads |
|
) |
| |
◆ solve_tridi_PRECISION_AND_SUFFIX()
| subroutine solve_tridi_PRECISION_AND_SUFFIX |
( |
class(elpa_abstract_impl_t), intent(inout) |
obj, |
|
|
integer(kind=ik), intent(in) |
na, |
|
|
integer(kind=ik), intent(in) |
nev, |
|
|
real(kind=real_datatype), dimension(na), intent(inout) |
d, |
|
|
real(kind=real_datatype), dimension(na), intent(inout) |
e, |
|
|
real(kind=real_datatype), dimension(ldq,matrixcols), intent(inout) |
q, |
|
|
integer(kind=ik), intent(in) |
ldq, |
|
|
integer(kind=ik), intent(in) |
nblk, |
|
|
integer(kind=ik), intent(in) |
matrixCols, |
|
|
integer(kind=ik), intent(in) |
mpi_comm_all, |
|
|
integer(kind=ik), intent(in) |
mpi_comm_rows, |
|
|
integer(kind=ik), intent(in) |
mpi_comm_cols, |
|
|
logical, intent(in) |
useGPU, |
|
|
logical, intent(in) |
wantDebug, |
|
|
logical, intent(out) |
success, |
|
|
integer(kind=ik), intent(in) |
max_threads |
|
) |
| |
◆ solve_tridi_single_problem_PRECISION_AND_SUFFIX()
| subroutine solve_tridi_single_problem_PRECISION_AND_SUFFIX |
( |
class(elpa_abstract_impl_t), intent(inout) |
obj, |
|
|
integer(kind=ik) |
nlen, |
|
|
real(kind=real_datatype), dimension(nlen) |
d, |
|
|
real(kind=real_datatype), dimension(nlen) |
e, |
|
|
real(kind=real_datatype), dimension(ldq,nlen) |
q, |
|
|
integer(kind=ik) |
ldq, |
|
|
logical, intent(in) |
wantDebug, |
|
|
logical, intent(out) |
success |
|
) |
| |
