Commit cb85c35f authored by Andreas Marek's avatar Andreas Marek

Rename src files of ELPA 1stage legacy interface

parent f6c230a4
...@@ -26,10 +26,10 @@ libelpa@SUFFIX@_public_la_SOURCES = \ ...@@ -26,10 +26,10 @@ libelpa@SUFFIX@_public_la_SOURCES = \
if ENABLE_LEGACY if ENABLE_LEGACY
libelpa@SUFFIX@_public_la_SOURCES += \ libelpa@SUFFIX@_public_la_SOURCES += \
src/elpa_driver/legacy_interface/elpa_legacy.F90 \ src/elpa_driver/legacy_interface/elpa_legacy.F90 \
src/elpa1/legacy_interface/elpa1_legacy.F90 \ src/elpa1/legacy_interface/elpa1.F90 \
src/elpa2/legacy_interface/elpa2_legacy.F90 \ src/elpa2/legacy_interface/elpa2_legacy.F90 \
src/elpa2/legacy_interface/elpa2_utilities_legacy.F90 \ src/elpa2/legacy_interface/elpa2_utilities_legacy.F90 \
src/elpa1/legacy_interface/elpa1_auxiliary_legacy.F90 src/elpa1/legacy_interface/elpa1_auxiliary.F90
endif endif
# internal parts # internal parts
...@@ -66,7 +66,7 @@ libelpa@SUFFIX@_private_la_SOURCES = \ ...@@ -66,7 +66,7 @@ libelpa@SUFFIX@_private_la_SOURCES = \
if ENABLE_LEGACY if ENABLE_LEGACY
libelpa@SUFFIX@_private_la_SOURCES += \ libelpa@SUFFIX@_private_la_SOURCES += \
src/elpa_driver/legacy_interface/elpa_driver_c_interface_legacy.F90 \ src/elpa_driver/legacy_interface/elpa_driver_c_interface_legacy.F90 \
src/elpa1/legacy_interface/elpa_1stage_c_interface_legacy.F90 \ src/elpa1/legacy_interface/elpa_1stage_c_interface.F90 \
src/elpa2/legacy_interface/elpa_2stage_c_interface_legacy.F90 src/elpa2/legacy_interface/elpa_2stage_c_interface_legacy.F90
endif endif
...@@ -100,20 +100,20 @@ EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES = \ ...@@ -100,20 +100,20 @@ EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES = \
if ENABLE_LEGACY if ENABLE_LEGACY
EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += \ EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += \
src/elpa1/legacy_interface/elpa1_template_legacy.X90 \ src/elpa1/legacy_interface/elpa1_template.X90 \
src/elpa2/legacy_interface/elpa2_template_legacy.X90 \ src/elpa2/legacy_interface/elpa2_template_legacy.X90 \
src/elpa1/legacy_interface/elpa1_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa1_c_interface_template.X90 \
src/elpa2/legacy_interface/elpa2_c_interface_template_legacy.X90 \ src/elpa2/legacy_interface/elpa2_c_interface_template_legacy.X90 \
src/elpa_driver/legacy_interface/elpa_driver_c_interface_template_legacy.X90 \ src/elpa_driver/legacy_interface/elpa_driver_c_interface_template_legacy.X90 \
src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_cholesky_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_cholesky_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_cholesky_template.X90 \
src/elpa1/legacy_interface/elpa_invert_trm_legacy.X90 \ src/elpa1/legacy_interface/elpa_invert_trm.X90 \
src/elpa1/legacy_interface/elpa_multiply_a_b_legacy.X90 \ src/elpa1/legacy_interface/elpa_multiply_a_b.X90 \
src/elpa1/legacy_interface/elpa_solve_tridi_legacy.X90 src/elpa1/legacy_interface/elpa_solve_tridi.X90
endif endif
if HAVE_DETAILED_TIMINGS if HAVE_DETAILED_TIMINGS
...@@ -1232,20 +1232,20 @@ EXTRA_DIST = \ ...@@ -1232,20 +1232,20 @@ EXTRA_DIST = \
if ENABLE_LEGACY if ENABLE_LEGACY
EXTRA_DIST += \ EXTRA_DIST += \
src/elpa1/elpa1_solve_tridi_real_template_legacy.X90 \ src/elpa1/elpa1_solve_tridi_real_template_legacy.X90 \
src/elpa1/legacy_interface/elpa1_template_legacy.X90 \ src/elpa1/legacy_interface/elpa1_template.X90 \
src/elpa2/legacy_interface/elpa2_template_legacy.X90 \ src/elpa2/legacy_interface/elpa2_template_legacy.X90 \
src/elpa1/legacy_interface/elpa1_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa1_c_interface_template.X90 \
src/elpa2/legacy_interface/elpa2_c_interface_template_legacy.X90 \ src/elpa2/legacy_interface/elpa2_c_interface_template_legacy.X90 \
src/elpa_driver/legacy_interface/elpa_driver_c_interface_template_legacy.X90 \ src/elpa_driver/legacy_interface/elpa_driver_c_interface_template_legacy.X90 \
src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_cholesky_c_interface_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.X90 \
src/elpa1/legacy_interface/elpa_cholesky_template_legacy.X90 \ src/elpa1/legacy_interface/elpa_cholesky_template.X90 \
src/elpa1/legacy_interface/elpa_invert_trm_legacy.X90 \ src/elpa1/legacy_interface/elpa_invert_trm.X90 \
src/elpa1/legacy_interface/elpa_multiply_a_b_legacy.X90 \ src/elpa1/legacy_interface/elpa_multiply_a_b.X90 \
src/elpa1/legacy_interface/elpa_solve_tridi_legacy.X90 src/elpa1/legacy_interface/elpa_solve_tridi.X90
endif endif
......
...@@ -14,7 +14,7 @@ config-f90.h: config.h ...@@ -14,7 +14,7 @@ config-f90.h: config.h
@grep "^#define" $^ > $@ || { rm $@; exit 1; } @grep "^#define" $^ > $@ || { rm $@; exit 1; }
elpa/elpa_generated.h: $(top_srcdir)/src/elpa_driver/legacy_interface/elpa_driver_c_interface_legacy.F90 \ elpa/elpa_generated.h: $(top_srcdir)/src/elpa_driver/legacy_interface/elpa_driver_c_interface_legacy.F90 \
$(top_srcdir)/src/elpa1/legacy_interface/elpa_1stage_c_interface_legacy.F90 \ $(top_srcdir)/src/elpa1/legacy_interface/elpa_1stage_c_interface.F90 \
$(top_srcdir)/src/elpa2/legacy_interface/elpa_2stage_c_interface_legacy.F90 | elpa $(top_srcdir)/src/elpa2/legacy_interface/elpa_2stage_c_interface_legacy.F90 | elpa
@rm -f $@ @rm -f $@
$(call extract_interface,!c>) $(call extract_interface,!c>)
......
...@@ -560,7 +560,7 @@ end function elpa_get_communicators ...@@ -560,7 +560,7 @@ end function elpa_get_communicators
#define REALCASE 1 #define REALCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa1_template_legacy.X90" #include "./elpa1_template.X90"
#undef REALCASE #undef REALCASE
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -604,7 +604,7 @@ end function elpa_get_communicators ...@@ -604,7 +604,7 @@ end function elpa_get_communicators
#define REALCASE 1 #define REALCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa1_template_legacy.X90" #include "./elpa1_template.X90"
#undef REALCASE #undef REALCASE
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_REAL */ #endif /* WANT_SINGLE_PRECISION_REAL */
...@@ -647,7 +647,7 @@ end function elpa_get_communicators ...@@ -647,7 +647,7 @@ end function elpa_get_communicators
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa1_template_legacy.X90" #include "./elpa1_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -693,7 +693,7 @@ end function elpa_get_communicators ...@@ -693,7 +693,7 @@ end function elpa_get_communicators
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define SINGLE_PRECISION #define SINGLE_PRECISION
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa1_template_legacy.X90" #include "./elpa1_template.X90"
#undef COMPLEXCASE #undef COMPLEXCASE
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_COMPLEX */ #endif /* WANT_SINGLE_PRECISION_COMPLEX */
......
...@@ -288,7 +288,7 @@ module ELPA1_AUXILIARY ...@@ -288,7 +288,7 @@ module ELPA1_AUXILIARY
function elpa_cholesky_real_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, & function elpa_cholesky_real_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, &
wantDebug) result(success) wantDebug) result(success)
#include "./elpa_cholesky_template_legacy.X90" #include "./elpa_cholesky_template.X90"
end function end function
#ifdef WANT_SINGLE_PRECISION_REAL #ifdef WANT_SINGLE_PRECISION_REAL
...@@ -315,7 +315,7 @@ module ELPA1_AUXILIARY ...@@ -315,7 +315,7 @@ module ELPA1_AUXILIARY
function elpa_cholesky_real_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, & function elpa_cholesky_real_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, &
wantDebug) result(success) wantDebug) result(success)
#include "./elpa_cholesky_template_legacy.X90" #include "./elpa_cholesky_template.X90"
end function end function
#endif /* WANT_SINGLE_PRECSION_REAL */ #endif /* WANT_SINGLE_PRECSION_REAL */
...@@ -338,7 +338,7 @@ module ELPA1_AUXILIARY ...@@ -338,7 +338,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on failure !> \param wantDebug logical, more debug information on failure
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_real_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_invert_trm_real_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_invert_trm_legacy.X90" #include "./elpa_invert_trm.X90"
end function end function
#if WANT_SINGLE_PRECISION_REAL #if WANT_SINGLE_PRECISION_REAL
...@@ -361,7 +361,7 @@ module ELPA1_AUXILIARY ...@@ -361,7 +361,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on failure !> \param wantDebug logical, more debug information on failure
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_real_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_invert_trm_real_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_invert_trm_legacy.X90" #include "./elpa_invert_trm.X90"
end function end function
#endif /* WANT_SINGLE_PRECISION_REAL */ #endif /* WANT_SINGLE_PRECISION_REAL */
...@@ -387,7 +387,7 @@ module ELPA1_AUXILIARY ...@@ -387,7 +387,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on failure !> \param wantDebug logical, more debug information on failure
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_cholesky_complex_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_cholesky_complex_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_cholesky_template_legacy.X90" #include "./elpa_cholesky_template.X90"
end function end function
...@@ -412,7 +412,7 @@ module ELPA1_AUXILIARY ...@@ -412,7 +412,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on failure !> \param wantDebug logical, more debug information on failure
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_cholesky_complex_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_cholesky_complex_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_cholesky_template_legacy.X90" #include "./elpa_cholesky_template.X90"
end function end function
#endif /* WANT_SINGLE_PRECISION_COMPLEX */ #endif /* WANT_SINGLE_PRECISION_COMPLEX */
...@@ -437,7 +437,7 @@ module ELPA1_AUXILIARY ...@@ -437,7 +437,7 @@ module ELPA1_AUXILIARY
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_complex_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_invert_trm_complex_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_invert_trm_legacy.X90" #include "./elpa_invert_trm.X90"
end function end function
#ifdef WANT_SINGLE_PRECISION_COMPLEX #ifdef WANT_SINGLE_PRECISION_COMPLEX
...@@ -461,7 +461,7 @@ module ELPA1_AUXILIARY ...@@ -461,7 +461,7 @@ module ELPA1_AUXILIARY
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_complex_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success) function elpa_invert_trm_complex_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) result(success)
#include "./elpa_invert_trm_legacy.X90" #include "./elpa_invert_trm.X90"
end function end function
#endif /* WANT_SINGE_PRECISION_COMPLEX */ #endif /* WANT_SINGE_PRECISION_COMPLEX */
...@@ -503,7 +503,7 @@ module ELPA1_AUXILIARY ...@@ -503,7 +503,7 @@ module ELPA1_AUXILIARY
function elpa_mult_at_b_real_double(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, & function elpa_mult_at_b_real_double(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success) mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b_legacy.X90" #include "./elpa_multiply_a_b.X90"
end function elpa_mult_at_b_real_double end function elpa_mult_at_b_real_double
#if WANT_SINGLE_PRECISION_REAL #if WANT_SINGLE_PRECISION_REAL
...@@ -546,7 +546,7 @@ module ELPA1_AUXILIARY ...@@ -546,7 +546,7 @@ module ELPA1_AUXILIARY
function elpa_mult_at_b_real_single(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, & function elpa_mult_at_b_real_single(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success) mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b_legacy.X90" #include "./elpa_multiply_a_b.X90"
end function elpa_mult_at_b_real_single end function elpa_mult_at_b_real_single
...@@ -593,7 +593,7 @@ module ELPA1_AUXILIARY ...@@ -593,7 +593,7 @@ module ELPA1_AUXILIARY
function elpa_mult_ah_b_complex_double(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, & function elpa_mult_ah_b_complex_double(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success) mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b_legacy.X90" #include "./elpa_multiply_a_b.X90"
end function elpa_mult_ah_b_complex_double end function elpa_mult_ah_b_complex_double
...@@ -639,7 +639,7 @@ module ELPA1_AUXILIARY ...@@ -639,7 +639,7 @@ module ELPA1_AUXILIARY
function elpa_mult_ah_b_complex_single(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, & function elpa_mult_ah_b_complex_single(uplo_a, uplo_c, na, ncb, a, lda, ldaCols, b, ldb, ldbCols, nblk, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success) mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b_legacy.X90" #include "./elpa_multiply_a_b.X90"
end function elpa_mult_ah_b_complex_single end function elpa_mult_ah_b_complex_single
...@@ -669,7 +669,7 @@ module ELPA1_AUXILIARY ...@@ -669,7 +669,7 @@ module ELPA1_AUXILIARY
function elpa_solve_tridi_double(na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) & function elpa_solve_tridi_double(na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, wantDebug) &
result(success) result(success)
#include "./elpa_solve_tridi_legacy.X90" #include "./elpa_solve_tridi.X90"
end function end function
...@@ -699,7 +699,7 @@ module ELPA1_AUXILIARY ...@@ -699,7 +699,7 @@ module ELPA1_AUXILIARY
function elpa_solve_tridi_single(na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, & function elpa_solve_tridi_single(na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, &
mpi_comm_cols, wantDebug) result(success) mpi_comm_cols, wantDebug) result(success)
#include "./elpa_solve_tridi_legacy.X90" #include "./elpa_solve_tridi.X90"
end function end function
......
...@@ -155,7 +155,7 @@ ...@@ -155,7 +155,7 @@
!c> int elpa_solve_evp_real_1stage_single_precision(int na, int nev, float *a, int lda, float *ev, float *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU); !c> int elpa_solve_evp_real_1stage_single_precision(int na, int nev, float *a, int lda, float *ev, float *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#endif #endif
#include "./elpa1_c_interface_template_legacy.X90" #include "./elpa1_c_interface_template.X90"
#undef REALCASE #undef REALCASE
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -195,7 +195,7 @@ ...@@ -195,7 +195,7 @@
!c> int elpa_solve_evp_real_1stage_single_precision(int na, int nev, float *a, int lda, float *ev, float *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU); !c> int elpa_solve_evp_real_1stage_single_precision(int na, int nev, float *a, int lda, float *ev, float *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#endif #endif
#include "./elpa1_c_interface_template_legacy.X90" #include "./elpa1_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
#endif /* WANT_SINGLE_PRECISION_REAL */ #endif /* WANT_SINGLE_PRECISION_REAL */
...@@ -234,7 +234,7 @@ ...@@ -234,7 +234,7 @@
!c> int elpa_solve_evp_complex_1stage_single_precision(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU); !c> int elpa_solve_evp_complex_1stage_single_precision(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#endif #endif
#include "./elpa1_c_interface_template_legacy.X90" #include "./elpa1_c_interface_template.X90"
#undef COMPLEXCASE #undef COMPLEXCASE
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -274,7 +274,7 @@ ...@@ -274,7 +274,7 @@
!c> int elpa_solve_evp_complex_1stage_single_precision(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU); !c> int elpa_solve_evp_complex_1stage_single_precision(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#endif #endif
#include "./elpa1_c_interface_template_legacy.X90" #include "./elpa1_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -302,7 +302,7 @@ ...@@ -302,7 +302,7 @@
#define REALCASE 1 #define REALCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_solve_tridi_c_interface_template_legacy.X90" #include "./elpa_solve_tridi_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -330,7 +330,7 @@ ...@@ -330,7 +330,7 @@
#define REALCASE 1 #define REALCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_solve_tridi_c_interface_template_legacy.X90" #include "./elpa_solve_tridi_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -377,7 +377,7 @@ ...@@ -377,7 +377,7 @@
#define REALCASE 1 #define REALCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_mult_at_b_c_interface_template_legacy.X90" #include "./elpa_mult_at_b_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -423,7 +423,7 @@ ...@@ -423,7 +423,7 @@
#define REALCASE 1 #define REALCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_mult_at_b_c_interface_template_legacy.X90" #include "./elpa_mult_at_b_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -467,7 +467,7 @@ ...@@ -467,7 +467,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_mult_ah_b_c_interface_template_legacy.X90" #include "./elpa_mult_ah_b_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -512,7 +512,7 @@ ...@@ -512,7 +512,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_mult_ah_b_c_interface_template_legacy.X90" #include "./elpa_mult_ah_b_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
#endif /* WANT_SINGLE_PRECISION_COMPLEX */ #endif /* WANT_SINGLE_PRECISION_COMPLEX */
...@@ -538,7 +538,7 @@ ...@@ -538,7 +538,7 @@
#define REALCASE 1 #define REALCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_invert_trm_c_interface_template_legacy.X90" #include "./elpa_invert_trm_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -566,7 +566,7 @@ ...@@ -566,7 +566,7 @@
#define REALCASE 1 #define REALCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_invert_trm_c_interface_template_legacy.X90" #include "./elpa_invert_trm_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -593,7 +593,7 @@ ...@@ -593,7 +593,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_invert_trm_c_interface_template_legacy.X90" #include "./elpa_invert_trm_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -619,7 +619,7 @@ ...@@ -619,7 +619,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_invert_trm_c_interface_template_legacy.X90" #include "./elpa_invert_trm_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -649,7 +649,7 @@ ...@@ -649,7 +649,7 @@
#define REALCASE 1 #define REALCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_cholesky_c_interface_template_legacy.X90" #include "./elpa_cholesky_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -678,7 +678,7 @@ ...@@ -678,7 +678,7 @@
#define REALCASE 1 #define REALCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_cholesky_c_interface_template_legacy.X90" #include "./elpa_cholesky_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -707,7 +707,7 @@ ...@@ -707,7 +707,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_cholesky_c_interface_template_legacy.X90" #include "./elpa_cholesky_c_interface_template.X90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -735,7 +735,7 @@ ...@@ -735,7 +735,7 @@
#define COMPLEXCASE 1 #define COMPLEXCASE 1
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../../general/precision_macros.h" #include "../../general/precision_macros.h"
#include "./elpa_cholesky_c_interface_template_legacy.X90" #include "./elpa_cholesky_c_interface_template.X90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
#endif /* WANT_SINGLE_PRECISION_COMPLEX */ #endif /* WANT_SINGLE_PRECISION_COMPLEX */
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment