There is a maintenance of MPCDF Gitlab on Thursday, April 22st 2020, 9:00 am CEST - Expect some service interruptions during this time

elpa_generic.h 777 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
#pragma once

/**
 * \todo document elpa_set()
 */
#define elpa_set(e, name, value, error) _Generic((value), \
                int: \
                  elpa_set_integer, \
                \
                double: \
                  elpa_set_double \
        )(e, name, value, error)

/**
 * \todo document elpa_solve()
 */
#define elpa_solve(handle, a, ev, q, error) _Generic((a), \
                double*: \
                  elpa_solve_real_double, \
                \
                float*: \
                  elpa_solve_real_single, \
                \
                double complex*: \
                  elpa_solve_complex_double, \
                \
                float complex*: \
                  elpa_solve_complex_single \
        )(handle, a, ev, q, error)