SIRIUS 7.5.0
Electronic structure library and applications
nlcglib/preconditioner/diag_mm.hpp
1// Copyright (c) 2023 Simon Pintarelli, Anton Kozhevnikov, Thomas Schulthess
2// All rights reserved.
3//
4// Redistribution and use in source and binary forms, with or without modification, are permitted provided that
5// the following conditions are met:
6//
7// 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the
8// following disclaimer.
9// 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions
10// and the following disclaimer in the documentation and/or other materials provided with the distribution.
11//
12// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED
13// WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
14// PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR
15// ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
16// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
17// CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
18// OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
19
20/** \file apply_hamiltonian.hpp
21 *
22 * \brief Helper function for nlcglib.
23 */
24
25#ifndef __DIAG_MM_HPP__
26#define __DIAG_MM_HPP__
27
28#include <complex>
29
30namespace sirius {
31
32extern "C" void ddiagmm(const double* diag, int n, const double* X, int lda_x, int ncols, double* Y, int lda_y,
33 double alpha);
34extern "C" void sdiagmm(const float* diag, int n, const float* X, int lda_x, int ncols, float* Y, int lda_y,
35 float alpha);
36extern "C" void zdiagmm(const std::complex<double>* diag, int n, const std::complex<double>* X, int lda_x, int ncols,
37 std::complex<double>* Y, int lda_y, std::complex<double> alpha);
38
39} // namespace sirius
40
41#endif /* __DIAG_MM_HPP__ */
Namespace of the SIRIUS library.
Definition: sirius.f90:5