Commit 3d7530c3 authored by Lorenz Huedepohl's avatar Lorenz Huedepohl

Rename all .X90 to .F90 and all .Xc to .c

Anything if it makes Andreas happy :)
parent b233069a
This diff is collapsed.
......@@ -46,8 +46,8 @@ src/elpa_generated_public_fortran_interfaces.h: $(filter-out $(wildcard $(top_sr
@rm -f $@
$(call extract_interface,!pf>)
generated_headers += src/fortran_constants.X90
src/fortran_constants.X90: $(top_srcdir)/src/fortran_constants.h | src
generated_headers += src/fortran_constants.F90
src/fortran_constants.F90: $(top_srcdir)/src/fortran_constants.h | src
@$(CPP) $(CPPFLAGS) -I$(top_builddir)/ -I$(top_srcdir)/ -I. $< -o $@_ || { rm -f $@; exit 1; }
@awk '/!ELPA_C_DEFINE/ {gsub(/!ELPA_C_DEFINE/, "\n"); gsub(/NEWLINE/, "\n"); print;}' < $@_ > $@ || { rm -f $@; exit 1; }
@rm $@_
......
This diff is collapsed.
......@@ -226,7 +226,7 @@ end function elpa_get_communicators_impl
#define REALCASE 1
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_template.X90"
#include "elpa1_template.F90"
#undef REALCASE
#undef DOUBLE_PRECISION
......@@ -263,7 +263,7 @@ end function elpa_get_communicators_impl
#define REALCASE 1
#define SINGLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_template.X90"
#include "elpa1_template.F90"
#undef REALCASE
#undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_REAL */
......@@ -299,7 +299,7 @@ end function elpa_get_communicators_impl
#define COMPLEXCASE 1
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_template.X90"
#include "elpa1_template.F90"
#undef DOUBLE_PRECISION
#undef COMPLEXCASE
......@@ -338,7 +338,7 @@ end function elpa_get_communicators_impl
#define COMPLEXCASE 1
#define SINGLE_PRECISION
#include "../general/precision_macros.h"
#include "elpa1_template.X90"
#include "elpa1_template.F90"
#undef COMPLEXCASE
#undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_COMPLEX */
......
......@@ -93,7 +93,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h"
function elpa_cholesky_real_double_impl (obj, a) result(success)
#include "elpa_cholesky_template.X90"
#include "elpa_cholesky_template.F90"
end function elpa_cholesky_real_double_impl
#undef DOUBLE_PRECISION
......@@ -105,7 +105,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h"
function elpa_cholesky_real_single_impl(obj, a) result(success)
#include "elpa_cholesky_template.X90"
#include "elpa_cholesky_template.F90"
end function elpa_cholesky_real_single_impl
#undef SINGLE_PRECISION
......@@ -132,7 +132,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced.
!> \result succes logical, reports success or failure
function elpa_invert_trm_real_double_impl(obj, a) result(success)
#include "elpa_invert_trm.X90"
#include "elpa_invert_trm.F90"
end function elpa_invert_trm_real_double_impl
#undef DOUBLE_PRECISION
#undef REALCASE
......@@ -159,7 +159,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure
function elpa_invert_trm_real_single_impl(obj, a) result(success)
#include "elpa_invert_trm.X90"
#include "elpa_invert_trm.F90"
end function elpa_invert_trm_real_single_impl
#undef SINGLE_PRECISION
#undef REALCASE
......@@ -188,7 +188,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure
function elpa_cholesky_complex_double_impl(obj, a) result(success)
#include "elpa_cholesky_template.X90"
#include "elpa_cholesky_template.F90"
end function elpa_cholesky_complex_double_impl
#undef DOUBLE_PRECISION
......@@ -216,7 +216,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure
function elpa_cholesky_complex_single_impl(obj, a) result(success)
#include "elpa_cholesky_template.X90"
#include "elpa_cholesky_template.F90"
end function elpa_cholesky_complex_single_impl
#undef SINGLE_PRECISION
......@@ -244,7 +244,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced.
!> \result succes logical, reports success or failure
function elpa_invert_trm_complex_double_impl(obj, a) result(success)
#include "elpa_invert_trm.X90"
#include "elpa_invert_trm.F90"
end function elpa_invert_trm_complex_double_impl
#undef DOUBLE_PRECISION
#undef COMPLEXCASE
......@@ -270,7 +270,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced.
!> \result succes logical, reports success or failure
function elpa_invert_trm_complex_single_impl(obj, a) result(success)
#include "elpa_invert_trm.X90"
#include "elpa_invert_trm.F90"
end function elpa_invert_trm_complex_single_impl
#undef SINGLE_PRECISION
#undef COMPLEXCASE
......@@ -282,7 +282,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h"
function elpa_mult_at_b_real_double_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success)
#include "elpa_multiply_a_b.X90"
#include "elpa_multiply_a_b.F90"
end function elpa_mult_at_b_real_double_impl
#undef DOUBLE_PRECISION
#undef REALCASE
......@@ -327,7 +327,7 @@ module elpa1_auxiliary_impl
function elpa_mult_at_b_real_single_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success)
#include "elpa_multiply_a_b.X90"
#include "elpa_multiply_a_b.F90"
end function elpa_mult_at_b_real_single_impl
#undef SINGLE_PRECISION
......@@ -375,7 +375,7 @@ module elpa1_auxiliary_impl
function elpa_mult_ah_b_complex_double_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success)
#include "elpa_multiply_a_b.X90"
#include "elpa_multiply_a_b.F90"
end function elpa_mult_ah_b_complex_double_impl
#undef DOUBLE_PRECISION
......@@ -423,7 +423,7 @@ module elpa1_auxiliary_impl
function elpa_mult_ah_b_complex_single_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success)
#include "elpa_multiply_a_b.X90"
#include "elpa_multiply_a_b.F90"
end function elpa_mult_ah_b_complex_single_impl
#undef SINGLE_PRECISION
......@@ -452,7 +452,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure
function elpa_solve_tridi_double_impl(obj, d, e, q) result(success)
#include "elpa_solve_tridi_impl_public.X90"
#include "elpa_solve_tridi_impl_public.F90"
end function
#undef DOUBLE_PRECISION
......@@ -481,7 +481,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure
function elpa_solve_tridi_single_impl(obj, d, e, q) result(success)
#include "elpa_solve_tridi_impl_public.X90"
#include "elpa_solve_tridi_impl_public.F90"
end function
#undef SINGLE_PRECISION
......
......@@ -158,8 +158,8 @@ module elpa1_compute
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90"
#include "elpa_reduce_add_vectors.X90"
#include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.F90"
#undef DOUBLE_PRECISION
#undef REALCASE
! single precision
......@@ -169,8 +169,8 @@ module elpa1_compute
#define SINGLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90"
#include "elpa_reduce_add_vectors.X90"
#include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.F90"
#undef SINGLE_PRECISION
#undef REALCASE
#endif
......@@ -180,8 +180,8 @@ module elpa1_compute
#define COMPLEXCASE 1
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90"
#include "elpa_reduce_add_vectors.X90"
#include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.F90"
#undef COMPLEXCASE
#undef DOUBLE_PRECISION
......@@ -190,8 +190,8 @@ module elpa1_compute
#define COMPLEXCASE 1
#define SINGLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90"
#include "elpa_reduce_add_vectors.X90"
#include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.F90"
#undef COMPLEXCASE
#undef SINGLE_PRECISION
......@@ -201,7 +201,7 @@ module elpa1_compute
#define REALCASE 1
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_compute_template.X90"
#include "elpa1_compute_template.F90"
#undef REALCASE
#undef DOUBLE_PRECISION
......@@ -213,7 +213,7 @@ module elpa1_compute
#define SINGLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_compute_template.X90"
#include "elpa1_compute_template.F90"
#undef REALCASE
#undef SINGLE_PRECISION
......@@ -224,7 +224,7 @@ module elpa1_compute
#define COMPLEXCASE 1
#define DOUBLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_compute_template.X90"
#include "elpa1_compute_template.F90"
#undef COMPLEXCASE
#undef DOUBLE_PRECISION
......@@ -235,7 +235,7 @@ module elpa1_compute
#define COMPLEXCASE 1
#define SINGLE_PRECISION 1
#include "../general/precision_macros.h"
#include "elpa1_compute_template.X90"
#include "elpa1_compute_template.F90"
#undef COMPLEXCASE
#undef SINGLE_PRECISION
......
......@@ -54,7 +54,7 @@
! Author: Andreas Marek, MPCDF
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
#if REALCASE == 1
......@@ -67,11 +67,11 @@
#if REALCASE == 1
#include "elpa1_tridiag_template.X90"
#include "elpa1_trans_ev_template.X90"
#include "elpa1_tridiag_template.F90"
#include "elpa1_trans_ev_template.F90"
! now comes a dirty hack:
! the file elpa1_solve_tridi_real_template.X90 must be included twice
! the file elpa1_solve_tridi_real_template.F90 must be included twice
! for the legacy and for the new API. In the new API, however, some routines
! must be named "..._impl"
......@@ -80,25 +80,25 @@
#else
#define PRECISION_AND_SUFFIX single
#endif
#include "elpa1_solve_tridi_real_template.X90"
#include "elpa1_solve_tridi_real_template.F90"
#undef PRECISION_AND_SUFFIX
#ifdef DOUBLE_PRECISION_REAL
#define PRECISION_AND_SUFFIX double_impl
#else
#define PRECISION_AND_SUFFIX single_impl
#endif
#include "elpa1_solve_tridi_real_template.X90"
#include "elpa1_solve_tridi_real_template.F90"
#undef PRECISION_AND_SUFFIX
#include "elpa1_merge_systems_real_template.X90"
#include "elpa1_tools_template.X90"
#include "elpa1_merge_systems_real_template.F90"
#include "elpa1_tools_template.F90"
#endif
#if COMPLEXCASE == 1
#include "elpa1_tridiag_template.X90"
#include "elpa1_trans_ev_template.X90"
#include "elpa1_tools_template.X90"
#include "elpa1_tridiag_template.F90"
#include "elpa1_trans_ev_template.F90"
#include "elpa1_tools_template.F90"
#define ALREADY_DEFINED 1
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
subroutine merge_systems_&
&PRECISION &
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
subroutine solve_tridi_&
&PRECISION_AND_SUFFIX &
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
function elpa_solve_evp_&
&MATH_DATATYPE&
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
#if REALCASE == 1
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
!> \brief Transforms the eigenvectors of a tridiagonal matrix back
!> to the eigenvectors of the original matrix
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../general/sanity.X90"
#include "../general/sanity.F90"
#undef SAVE_MATR
#ifdef DOUBLE_PRECISION_REAL
......
......@@ -42,7 +42,7 @@
! any derivatives of ELPA under the same license that we chose for
! the original distribution, the GNU Lesser General Public License.
#include "../general/sanity.X90"
#include "../general/sanity.F90"
use elpa1_compute
use elpa_utilities
use elpa_mpi
......
......@@ -50,7 +50,7 @@
! with their original authors, but shall adhere to the licensing terms
! distributed along with the original code in the file "COPYING".
#include "../general/sanity.X90"
#include "../general/sanity.F90"
use precision
use elpa1_compute
......
......@@ -53,7 +53,7 @@
! Author: A. Marek, MPCDF
#include "../general/sanity.X90"
#include "../general/sanity.F90"
use elpa1_compute
use elpa_mpi
......
......@@ -44,7 +44,7 @@
#endif
#include "config-f90.h"
#include "../general/sanity.X90"
#include "../general/sanity.F90"
subroutine elpa_reduce_add_vectors_&
&MATH_DATATYPE&
......
......@@ -54,7 +54,7 @@
#include "../general/sanity.X90"
#include "../general/sanity.F90"
use elpa1_compute, solve_tridi_&
&PRECISION&
......
......@@ -48,7 +48,7 @@
#endif
#include "config-f90.h"
#include "../general/sanity.X90"
#include "../general/sanity.F90"
subroutine elpa_transpose_vectors_&
&MATH_DATATYPE&
......
......@@ -560,7 +560,7 @@ end function elpa_get_communicators
#define REALCASE 1
#define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa1_template.X90"
#include "./elpa1_template.F90"
#undef REALCASE
#undef DOUBLE_PRECISION
......@@ -604,7 +604,7 @@ end function elpa_get_communicators
#define REALCASE 1
#define SINGLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa1_template.X90"
#include "./elpa1_template.F90"
#undef REALCASE
#undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_REAL */
......@@ -647,7 +647,7 @@ end function elpa_get_communicators
#define COMPLEXCASE 1
#define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa1_template.X90"
#include "./elpa1_template.F90"
#undef DOUBLE_PRECISION
#undef COMPLEXCASE
......@@ -693,7 +693,7 @@ end function elpa_get_communicators
#define COMPLEXCASE 1
#define SINGLE_PRECISION
#include "../../general/precision_macros.h"
#include "./elpa1_template.X90"
#include "./elpa1_template.F90"
#undef COMPLEXCASE
#undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_COMPLEX */
......
......@@ -288,7 +288,7 @@ module ELPA1_AUXILIARY
function elpa_cholesky_real_double(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, &
wantDebug) result(success)
#include "./elpa_cholesky_template.X90"
#include "./elpa_cholesky_template.F90"
end function
#ifdef WANT_SINGLE_PRECISION_REAL
......@@ -315,7 +315,7 @@ module ELPA1_AUXILIARY
function elpa_cholesky_real_single(na, a, lda, nblk, matrixCols, mpi_comm_rows, mpi_comm_cols, &
wantDebug) result(success)
#include "./elpa_cholesky_template.X90"
#include "./elpa_cholesky_template.F90"
end function
#endif /* WANT_SINGLE_PRECSION_REAL */
......@@ -338,7 +338,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on 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)
#include "./elpa_invert_trm.X90"
#include "./elpa_invert_trm.F90"
end function
#if WANT_SINGLE_PRECISION_REAL
......@@ -361,7 +361,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on 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)
#include "./elpa_invert_trm.X90"
#include "./elpa_invert_trm.F90"
end function
#endif /* WANT_SINGLE_PRECISION_REAL */
......@@ -387,7 +387,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on 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)
#include "./elpa_cholesky_template.X90"
#include "./elpa_cholesky_template.F90"
end function
......@@ -412,7 +412,7 @@ module ELPA1_AUXILIARY
!> \param wantDebug logical, more debug information on 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)
#include "./elpa_cholesky_template.X90"
#include "./elpa_cholesky_template.F90"
end function
#endif /* WANT_SINGLE_PRECISION_COMPLEX */
......@@ -437,7 +437,7 @@ module ELPA1_AUXILIARY
!> \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)
#include "./elpa_invert_trm.X90"
#include "./elpa_invert_trm.F90"
end function
#ifdef WANT_SINGLE_PRECISION_COMPLEX
......@@ -461,7 +461,7 @@ module ELPA1_AUXILIARY
!> \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)
#include "./elpa_invert_trm.X90"
#include "./elpa_invert_trm.F90"
end function
#endif /* WANT_SINGE_PRECISION_COMPLEX */
......@@ -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, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b.X90"
#include "./elpa_multiply_a_b.F90"
end function elpa_mult_at_b_real_double
#if WANT_SINGLE_PRECISION_REAL
......@@ -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, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b.X90"
#include "./elpa_multiply_a_b.F90"
end function elpa_mult_at_b_real_single
......@@ -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, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b.X90"
#include "./elpa_multiply_a_b.F90"
end function elpa_mult_ah_b_complex_double
......@@ -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, &
mpi_comm_rows, mpi_comm_cols, c, ldc, ldcCols) result(success)
#include "./elpa_multiply_a_b.X90"
#include "./elpa_multiply_a_b.F90"
end function elpa_mult_ah_b_complex_single
......@@ -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) &
result(success)
#include "./elpa_solve_tridi.X90"
#include "./elpa_solve_tridi.F90"
end function
......@@ -699,7 +699,7 @@ module ELPA1_AUXILIARY
function elpa_solve_tridi_single(na, nev, d, e, q, ldq, nblk, matrixCols, mpi_comm_rows, &
mpi_comm_cols, wantDebug) result(success)
#include "./elpa_solve_tridi.X90"
#include "./elpa_solve_tridi.F90"
end function
......
......@@ -52,7 +52,7 @@
! distributed along with the original code in the file "COPYING".
#endif
#include "../../general/sanity.X90"
#include "../../general/sanity.F90"
function elpa_solve_evp_&
&MATH_DATATYPE&
......
......@@ -150,7 +150,7 @@
#include "../../general/precision_macros.h"
!lc> int elpa_solve_evp_real_1stage_double_precision(int na, int nev, double *a, int lda, double *ev, double *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#include "./elpa1_c_interface_template.X90"
#include "./elpa1_c_interface_template.F90"
#undef REALCASE
#undef DOUBLE_PRECISION
......@@ -186,7 +186,7 @@
!lc> 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);
#include "./elpa1_c_interface_template.X90"
#include "./elpa1_c_interface_template.F90"
#undef SINGLE_PRECISION
#undef REALCASE
#endif /* WANT_SINGLE_PRECISION_REAL */
......@@ -221,7 +221,7 @@
!lc> int elpa_solve_evp_complex_1stage_double_precision(int na, int nev, double complex *a, int lda, double *ev, double complex *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#include "./elpa1_c_interface_template.X90"
#include "./elpa1_c_interface_template.F90"
#undef COMPLEXCASE
#undef DOUBLE_PRECISION
......@@ -257,7 +257,7 @@
!lc> int elpa_solve_evp_complex_1stage_single_precision(int na, int nev, complex float *a, int lda, float *ev, complex float *q, int ldq, int nblk, int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int useGPU);
#include "./elpa1_c_interface_template.X90"
#include "./elpa1_c_interface_template.F90"
#undef SINGLE_PRECISION
#undef COMPLEXCASE
......@@ -285,7 +285,7 @@
#define REALCASE 1
#define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_solve_tridi_c_interface_template.X90"
#include "./elpa_solve_tridi_c_interface_template.F90"
#undef DOUBLE_PRECISION
#undef REALCASE
......@@ -313,7 +313,7 @@
#define REALCASE 1
#define SINGLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_solve_tridi_c_interface_template.X90"
#include "./elpa_solve_tridi_c_interface_template.F90"
#undef SINGLE_PRECISION
#undef REALCASE
......@@ -360,7 +360,7 @@
#define REALCASE 1
#define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_mult_at_b_c_interface_template.X90"
#include "./elpa_mult_at_b_c_interface_template.F90"
#undef DOUBLE_PRECISION
#undef REALCASE
......@@ -406,7 +406,7 @@
#define REALCASE 1
#define SINGLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_mult_at_b_c_interface_template.X90"
#include "./elpa_mult_at_b_c_interface_template.F90"
#undef SINGLE_PRECISION
#undef REALCASE
......@@ -450,7 +450,7 @@
#define COMPLEXCASE 1
#define DOUBLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_mult_ah_b_c_interface_template.X90"
#include "./elpa_mult_ah_b_c_interface_template.F90"
#undef DOUBLE_PRECISION
#undef COMPLEXCASE
......@@ -495,7 +495,7 @@
#define COMPLEXCASE 1
#define SINGLE_PRECISION 1
#include "../../general/precision_macros.h"
#include "./elpa_mult_ah_b_c_interface_template.X90"
#include "./elpa_mult_ah_b_c_interface_template.F90"
#undef SINGLE_PRECISION
#undef COMPLEXCASE
#endif /* WANT_SINGLE_PRECISION_COMPLEX */