3 ! Copyright 2017, L. Hüdepohl and A. Marek, MPCDF
5 ! This file is part of ELPA.
7 ! The ELPA library was originally created by the ELPA consortium,
8 ! consisting of the following organizations:
10 ! - Max Planck Computing and Data Facility (MPCDF), formerly known as
11 ! Rechenzentrum Garching der Max-Planck-Gesellschaft (RZG),
12 ! - Bergische Universität Wuppertal, Lehrstuhl für angewandte
14 ! - Technische Universität München, Lehrstuhl für Informatik mit
15 ! Schwerpunkt Wissenschaftliches Rechnen ,
16 ! - Fritz-Haber-Institut, Berlin, Abt. Theorie,
17 ! - Max-Plack-Institut für Mathematik in den Naturwissenschaften,
18 ! Leipzig, Abt. Komplexe Strukutren in Biologie und Kognition,
20 ! - IBM Deutschland GmbH
22 ! This particular source code file contains additions, changes and
23 ! enhancements authored by Intel Corporation which is not part of
24 ! the ELPA consortium.
26 ! More information can be found here:
29 ! ELPA is free software: you can redistribute it and/or modify
30 ! it under the terms of the version 3 of the license of the
31 ! GNU Lesser General Public License as published by the Free
32 ! Software Foundation.
34 ! ELPA is distributed in the hope that it will be useful,
35 ! but WITHOUT ANY WARRANTY; without even the implied warranty of
36 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
37 ! GNU Lesser General Public License
for more details.
39 ! You should have received a copy of the GNU Lesser General Public License
40 ! along with ELPA. If not, see <http:
42 ! ELPA reflects a substantial effort on the part of the original
43 ! ELPA consortium, and we ask you to respect the spirit of the
44 ! license that we chose: i.e., please contribute any changes you
45 ! may have back to the original ELPA library distribution, and keep
46 ! any derivatives of ELPA under the same license that we chose
for
47 ! the original distribution, the GNU Lesser General Public License.
53 #define FORTRAN_CONSTANT(name, value, ...) \
54 integer(kind=C_INT), parameter :: name = value !ELPA_C_DEFINE
59 ! matrix layout constants
64 #undef ELPA_NUMBER_OF_SOLVERS
70 #undef ELPA_2STAGE_NUMBER_OF_REAL_KERNELS
76 #undef ELPA_2STAGE_NUMBER_OF_COMPLEX_KERNELS