SIRIUS 7.5.0
Electronic structure library and applications
cusolver.cpp
1#ifdef SIRIUS_CUDA
2#include "cusolver.hpp"
3
4namespace sirius {
5namespace acc {
6namespace cusolver {
7
8cusolverDnHandle_t&
9cusolver_handle()
10{
11 static cusolverDnHandle_t handle;
12 return handle;
13}
14
15void
16create_handle()
17{
18 CALL_CUSOLVER(cusolverDnCreate, (&cusolver_handle()));
19}
20
21void
22destroy_handle()
23{
24 CALL_CUSOLVER(cusolverDnDestroy, (cusolver_handle()));
25}
26
27} // namespace cusolver
28} // namespace acc
29} // namespace sirius
30
31#endif
Interface to CUDA eigen-solver library.
Namespace of the SIRIUS library.
Definition: sirius.f90:5