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

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

Anything if it makes Andreas happy :)
parent b233069a
...@@ -81,52 +81,52 @@ libelpa@SUFFIX@_private_la_SOURCES += \ ...@@ -81,52 +81,52 @@ libelpa@SUFFIX@_private_la_SOURCES += \
endif endif
EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES = \ EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES = \
src/elpa1/elpa_reduce_add_vectors.X90 \ src/elpa1/elpa_reduce_add_vectors.F90 \
src/elpa1/elpa_transpose_vectors.X90 \ src/elpa1/elpa_transpose_vectors.F90 \
src/elpa1/elpa1_compute_template.X90 \ src/elpa1/elpa1_compute_template.F90 \
src/elpa2/elpa2_compute_real_template.X90 \ src/elpa2/elpa2_compute_real_template.F90 \
src/elpa2/elpa2_compute_complex_template.X90 \ src/elpa2/elpa2_compute_complex_template.F90 \
src/elpa1/elpa1_template.X90 \ src/elpa1/elpa1_template.F90 \
src/elpa2/elpa2_template.X90 \ src/elpa2/elpa2_template.F90 \
src/elpa2/qr/qr_utils_template.X90 \ src/elpa2/qr/qr_utils_template.F90 \
src/elpa2/qr/elpa_pdlarfb_template.X90 \ src/elpa2/qr/elpa_pdlarfb_template.F90 \
src/elpa2/qr/elpa_pdgeqrf_template.X90 \ src/elpa2/qr/elpa_pdgeqrf_template.F90 \
src/elpa2/elpa2_bandred_template.X90 \ src/elpa2/elpa2_bandred_template.F90 \
src/elpa2/elpa2_symm_matrix_allreduce_real_template.X90 \ src/elpa2/elpa2_symm_matrix_allreduce_real_template.F90 \
src/elpa2/elpa2_trans_ev_band_to_full_template.X90 \ src/elpa2/elpa2_trans_ev_band_to_full_template.F90 \
src/elpa2/elpa2_tridiag_band_template.X90 \ src/elpa2/elpa2_tridiag_band_template.F90 \
src/elpa2/elpa2_trans_ev_tridi_to_band_template.X90 \ src/elpa2/elpa2_trans_ev_tridi_to_band_template.F90 \
src/elpa2/elpa2_herm_matrix_allreduce_complex_template.X90 \ src/elpa2/elpa2_herm_matrix_allreduce_complex_template.F90 \
src/elpa2/kernels/real_template.X90 \ src/elpa2/kernels/real_template.F90 \
src/elpa2/kernels/complex_template.X90 \ src/elpa2/kernels/complex_template.F90 \
src/elpa2/kernels/simple_template.X90 \ src/elpa2/kernels/simple_template.F90 \
src/elpa2/pack_unpack_cpu.X90 \ src/elpa2/pack_unpack_cpu.F90 \
src/elpa2/pack_unpack_gpu.X90 \ src/elpa2/pack_unpack_gpu.F90 \
src/elpa2/compute_hh_trafo.X90 \ src/elpa2/compute_hh_trafo.F90 \
src/elpa2/redist_band.X90 \ src/elpa2/redist_band.F90 \
src/general/sanity.X90 \ src/general/sanity.F90 \
src/elpa1/elpa_cholesky_template.X90 \ src/elpa1/elpa_cholesky_template.F90 \
src/elpa1/elpa_invert_trm.X90 \ src/elpa1/elpa_invert_trm.F90 \
src/elpa1/elpa_multiply_a_b.X90 \ src/elpa1/elpa_multiply_a_b.F90 \
src/elpa1/elpa_solve_tridi_impl_public.X90 \ src/elpa1/elpa_solve_tridi_impl_public.F90 \
src/general/precision_macros.h src/general/precision_macros.h
if ENABLE_LEGACY if ENABLE_LEGACY
EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += \ EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += \
src/elpa1/legacy_interface/elpa1_template.X90 \ src/elpa1/legacy_interface/elpa1_template.F90 \
src/elpa2/legacy_interface/elpa2_template.X90 \ src/elpa2/legacy_interface/elpa2_template.F90 \
src/elpa1/legacy_interface/elpa1_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa1_c_interface_template.F90 \
src/elpa2/legacy_interface/elpa2_c_interface_template.X90 \ src/elpa2/legacy_interface/elpa2_c_interface_template.F90 \
src/elpa_driver/legacy_interface/elpa_driver_c_interface_template.X90 \ src/elpa_driver/legacy_interface/elpa_driver_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_cholesky_template.X90 \ src/elpa1/legacy_interface/elpa_cholesky_template.F90 \
src/elpa1/legacy_interface/elpa_invert_trm.X90 \ src/elpa1/legacy_interface/elpa_invert_trm.F90 \
src/elpa1/legacy_interface/elpa_multiply_a_b.X90 \ src/elpa1/legacy_interface/elpa_multiply_a_b.F90 \
src/elpa1/legacy_interface/elpa_solve_tridi.X90 src/elpa1/legacy_interface/elpa_solve_tridi.F90
endif endif
if HAVE_DETAILED_TIMINGS if HAVE_DETAILED_TIMINGS
...@@ -152,7 +152,7 @@ endif ...@@ -152,7 +152,7 @@ endif
if WITH_GPU_VERSION if WITH_GPU_VERSION
libelpa@SUFFIX@_private_la_SOURCES += src/GPU/cudaFunctions.cu src/GPU/cuUtils.cu src/elpa2/GPU/ev_tridi_band_gpu_c_v2.cu libelpa@SUFFIX@_private_la_SOURCES += src/GPU/cudaFunctions.cu src/GPU/cuUtils.cu src/elpa2/GPU/ev_tridi_band_gpu_c_v2.cu
EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += src/elpa2/GPU/ev_tridi_band_gpu_c_v2_complex_template.Xcu src/elpa2/GPU/ev_tridi_band_gpu_c_v2_real_template.Xcu EXTRA_libelpa@SUFFIX@_private_la_DEPENDENCIES += src/elpa2/GPU/ev_tridi_band_gpu_c_v2_complex_template.cu src/elpa2/GPU/ev_tridi_band_gpu_c_v2_real_template.Xcu
endif endif
if !WITH_MPI if !WITH_MPI
...@@ -458,12 +458,10 @@ libelpatest@SUFFIX@_la_SOURCES = \ ...@@ -458,12 +458,10 @@ libelpatest@SUFFIX@_la_SOURCES = \
test/shared/test_util.F90 \ test/shared/test_util.F90 \
test/shared/test_read_input_parameters.F90 \ test/shared/test_read_input_parameters.F90 \
test/shared/test_check_correctness.F90 \ test/shared/test_check_correctness.F90 \
test/shared/test_check_correctness_template.X90 \
test/shared/test_setup_mpi.F90 \ test/shared/test_setup_mpi.F90 \
test/shared/test_blacs_infrastructure.F90 \ test/shared/test_blacs_infrastructure.F90 \
test/shared/test_prepare_matrix.F90 \ test/shared/test_prepare_matrix.F90 \
test/shared/test_prepare_matrix_template.X90 \ test/shared/test_analytic.F90 \
test/shared/test_analytic.F90 \
test/shared/test_output_type.F90 test/shared/test_output_type.F90
if HAVE_REDIRECT if HAVE_REDIRECT
...@@ -569,99 +567,101 @@ distclean-local: ...@@ -569,99 +567,101 @@ distclean-local:
-rmdir .fortran_dependencies/ -rmdir .fortran_dependencies/
EXTRA_DIST = \ EXTRA_DIST = \
elpa.spec \
elpa/elpa.h \ elpa/elpa.h \
elpa/elpa_legacy.h \
elpa/elpa_generic.h \ elpa/elpa_generic.h \
fdep/fortran_dependencies.pl \ elpa/elpa_legacy.h \
fdep/fortran_dependencies.mk \ fdep/fortran_dependencies.mk \
fdep/fortran_dependencies.pl \
manual_cpp \ manual_cpp \
test/Fortran/elpa_print_headers.X90 \ nvcc_wrap \
test/Fortran/assert.h \ src/GPU/cuUtils_template.cu \
src/general/prow_pcol.X90 \ src/elpa1/elpa1_compute_template.F90 \
src/general/map_global_to_local.X90 \ src/elpa1/elpa1_merge_systems_real_template.F90 \
src/elpa1/elpa_reduce_add_vectors.X90 \ src/elpa1/elpa1_solve_tridi_real_template.F90 \
src/elpa1/elpa_transpose_vectors.X90 \ src/elpa1/elpa1_template.F90 \
src/elpa1/elpa1_compute_template.X90 \ src/elpa1/elpa1_tools_template.F90 \
src/elpa1/elpa1_merge_systems_real_template.X90 \ src/elpa1/elpa1_trans_ev_template.F90 \
src/elpa1/elpa1_solve_tridi_real_template.X90 \ src/elpa1/elpa1_tridiag_template.F90 \
src/elpa1/elpa1_tools_template.X90 \ src/elpa1/elpa_cholesky_template.F90 \
src/elpa1/elpa1_trans_ev_template.X90 \ src/elpa1/elpa_invert_trm.F90 \
src/elpa1/elpa1_tridiag_template.X90 \ src/elpa1/elpa_multiply_a_b.F90 \
src/elpa2/elpa2_compute_real_template.X90 \ src/elpa1/elpa_reduce_add_vectors.F90 \
src/elpa2/elpa2_compute_complex_template.X90 \ src/elpa1/elpa_solve_tridi_impl_public.F90 \
src/elpa2/elpa2_bandred_template.X90 \ src/elpa1/elpa_transpose_vectors.F90 \
src/elpa2/elpa2_herm_matrix_allreduce_complex_template.X90 \ src/elpa2/GPU/ev_tridi_band_gpu_c_v2_complex_template.cu \
src/elpa2/elpa2_symm_matrix_allreduce_real_template.X90 \ src/elpa2/GPU/ev_tridi_band_gpu_c_v2_real_template.cu \
src/elpa1/elpa1_template.X90 \ src/elpa2/compute_hh_trafo.F90 \
src/elpa2/elpa2_template.X90 \ src/elpa2/elpa2_bandred_template.F90 \
src/elpa2/qr/qr_utils_template.X90 \ src/elpa2/elpa2_compute_complex_template.F90 \
src/elpa2/qr/elpa_pdlarfb_template.X90 \ src/elpa2/elpa2_compute_real_template.F90 \
src/elpa2/qr/elpa_pdgeqrf_template.X90 \ src/elpa2/elpa2_herm_matrix_allreduce_complex_template.F90 \
src/elpa2/elpa2_tridiag_band_template.X90 \ src/elpa2/elpa2_symm_matrix_allreduce_real_template.F90 \
src/elpa2/elpa2_trans_ev_band_to_full_template.X90 \ src/elpa2/elpa2_template.F90 \
src/elpa2/elpa2_trans_ev_tridi_to_band_template.X90 \ src/elpa2/elpa2_trans_ev_band_to_full_template.F90 \
src/general/precision_macros.h \ src/elpa2/elpa2_trans_ev_tridi_to_band_template.F90 \
src/elpa2/elpa2_tridiag_band_template.F90 \
src/elpa2/kernels/complex_avx-avx2_1hv_template.c \
src/elpa2/kernels/complex_avx-avx2_2hv_template.c \
src/elpa2/kernels/complex_avx512_1hv_template.c \
src/elpa2/kernels/complex_avx512_2hv_template.c \
src/elpa2/kernels/complex_sse_1hv_template.c \
src/elpa2/kernels/complex_sse_2hv_template.c \
src/elpa2/kernels/complex_template.F90 \
src/elpa2/kernels/real_avx-avx2_2hv_template.c \
src/elpa2/kernels/real_avx-avx2_4hv_template.c \
src/elpa2/kernels/real_avx-avx2_6hv_template.c \
src/elpa2/kernels/real_avx512_2hv_template.c \
src/elpa2/kernels/real_avx512_4hv_template.c \
src/elpa2/kernels/real_avx512_6hv_template.c \
src/elpa2/kernels/real_sse_2hv_template.c \
src/elpa2/kernels/real_sse_4hv_template.c \
src/elpa2/kernels/real_sse_6hv_template.c \
src/elpa2/kernels/real_template.F90 \
src/elpa2/kernels/simple_template.F90 \
src/elpa2/pack_unpack_cpu.F90 \
src/elpa2/pack_unpack_gpu.F90 \
src/elpa2/qr/elpa_pdgeqrf_template.F90 \
src/elpa2/qr/elpa_pdlarfb_template.F90 \
src/elpa2/qr/elpa_qrkernels_template.F90 \
src/elpa2/qr/qr_utils_template.F90 \
src/elpa2/redist_band.F90 \
src/elpa_index.h \ src/elpa_index.h \
src/fortran_constants.h \ src/fortran_constants.h \
src/elpa2/kernels/real_template.X90 \ src/general/map_global_to_local.F90 \
src/elpa2/kernels/complex_template.X90 \ src/general/precision_macros.h \
src/elpa2/kernels/simple_template.X90 \ src/general/prow_pcol.F90 \
src/elpa2/kernels/real_sse_2hv_template.Xc \ src/general/sanity.F90 \
src/elpa2/kernels/real_sse_4hv_template.Xc \ test/Fortran/assert.h \
src/elpa2/kernels/real_sse_6hv_template.Xc \ test/Fortran/elpa_print_headers.F90 \
src/elpa2/kernels/real_avx-avx2_2hv_template.Xc \ test/shared/test_check_correctness_template.F90 \
src/elpa2/kernels/real_avx-avx2_4hv_template.Xc \ test/shared/test_check_correctness_template.F90 \
src/elpa2/kernels/real_avx-avx2_6hv_template.Xc \ test/shared/test_prepare_matrix_template.F90 \
src/elpa2/kernels/real_avx512_2hv_template.Xc \ test/shared/test_prepare_matrix_template.F90 \
src/elpa2/kernels/real_avx512_4hv_template.Xc \
src/elpa2/kernels/real_avx512_6hv_template.Xc \
src/elpa2/kernels/complex_sse_1hv_template.Xc \
src/elpa2/kernels/complex_sse_2hv_template.Xc \
src/elpa2/kernels/complex_avx-avx2_1hv_template.Xc \
src/elpa2/kernels/complex_avx-avx2_2hv_template.Xc \
src/elpa2/kernels/complex_avx512_1hv_template.Xc \
src/elpa2/kernels/complex_avx512_2hv_template.Xc \
src/elpa2/redist_band.X90 \
src/elpa2/pack_unpack_cpu.X90 \
src/elpa2/pack_unpack_gpu.X90 \
src/elpa2/compute_hh_trafo.X90 \
src/general/sanity.X90 \
src/elpa1/elpa_cholesky_template.X90 \
src/elpa1/elpa_invert_trm.X90 \
src/elpa1/elpa_multiply_a_b.X90 \
src/elpa1/elpa_solve_tridi_impl_public.X90 \
src/elpa2/qr/elpa_qrkernels_template.X90 \
src/elpa2/GPU/ev_tridi_band_gpu_c_v2_complex_template.Xcu \
src/elpa2/GPU/ev_tridi_band_gpu_c_v2_real_template.Xcu \
src/GPU/cuUtils_template.Xcu \
test/shared/test_prepare_matrix_template.X90 \
test/shared/test_check_correctness_template.X90 \
nvcc_wrap \
test_project/Makefile.am \ test_project/Makefile.am \
test_project/autogen.sh \ test_project/autogen.sh \
test_project/configure.ac \ test_project/configure.ac \
test_project/fdep \ test_project/fdep \
test_project/src/test_real.F90 \
test_project/m4 \ test_project/m4 \
elpa.spec test_project/src/test_real.F90
if ENABLE_LEGACY if ENABLE_LEGACY
EXTRA_DIST += \ EXTRA_DIST += \
src/elpa1/elpa1_solve_tridi_real_template.X90 \ src/elpa1/elpa1_solve_tridi_real_template.F90 \
src/elpa1/legacy_interface/elpa1_template.X90 \ src/elpa1/legacy_interface/elpa1_template.F90 \
src/elpa2/legacy_interface/elpa2_template.X90 \ src/elpa2/legacy_interface/elpa2_template.F90 \
src/elpa1/legacy_interface/elpa1_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa1_c_interface_template.F90 \
src/elpa2/legacy_interface/elpa2_c_interface_template.X90 \ src/elpa2/legacy_interface/elpa2_c_interface_template.F90 \
src/elpa_driver/legacy_interface/elpa_driver_c_interface_template.X90 \ src/elpa_driver/legacy_interface/elpa_driver_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_solve_tridi_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_mult_at_b_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_mult_ah_b_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_invert_trm_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.X90 \ src/elpa1/legacy_interface/elpa_cholesky_c_interface_template.F90 \
src/elpa1/legacy_interface/elpa_cholesky_template.X90 \ src/elpa1/legacy_interface/elpa_cholesky_template.F90 \
src/elpa1/legacy_interface/elpa_invert_trm.X90 \ src/elpa1/legacy_interface/elpa_invert_trm.F90 \
src/elpa1/legacy_interface/elpa_multiply_a_b.X90 \ src/elpa1/legacy_interface/elpa_multiply_a_b.F90 \
src/elpa1/legacy_interface/elpa_solve_tridi.X90 src/elpa1/legacy_interface/elpa_solve_tridi.F90
endif endif
LIBTOOL_DEPS = @LIBTOOL_DEPS@ LIBTOOL_DEPS = @LIBTOOL_DEPS@
......
...@@ -46,8 +46,8 @@ src/elpa_generated_public_fortran_interfaces.h: $(filter-out $(wildcard $(top_sr ...@@ -46,8 +46,8 @@ src/elpa_generated_public_fortran_interfaces.h: $(filter-out $(wildcard $(top_sr
@rm -f $@ @rm -f $@
$(call extract_interface,!pf>) $(call extract_interface,!pf>)
generated_headers += src/fortran_constants.X90 generated_headers += src/fortran_constants.F90
src/fortran_constants.X90: $(top_srcdir)/src/fortran_constants.h | src 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; } @$(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; } @awk '/!ELPA_C_DEFINE/ {gsub(/!ELPA_C_DEFINE/, "\n"); gsub(/NEWLINE/, "\n"); print;}' < $@_ > $@ || { rm -f $@; exit 1; }
@rm $@_ @rm $@_
......
This diff is collapsed.
...@@ -226,7 +226,7 @@ end function elpa_get_communicators_impl ...@@ -226,7 +226,7 @@ end function elpa_get_communicators_impl
#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.X90" #include "elpa1_template.F90"
#undef REALCASE #undef REALCASE
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -263,7 +263,7 @@ end function elpa_get_communicators_impl ...@@ -263,7 +263,7 @@ end function elpa_get_communicators_impl
#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.X90" #include "elpa1_template.F90"
#undef REALCASE #undef REALCASE
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_REAL */ #endif /* WANT_SINGLE_PRECISION_REAL */
...@@ -299,7 +299,7 @@ end function elpa_get_communicators_impl ...@@ -299,7 +299,7 @@ end function elpa_get_communicators_impl
#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.X90" #include "elpa1_template.F90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -338,7 +338,7 @@ end function elpa_get_communicators_impl ...@@ -338,7 +338,7 @@ end function elpa_get_communicators_impl
#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.X90" #include "elpa1_template.F90"
#undef COMPLEXCASE #undef COMPLEXCASE
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#endif /* WANT_SINGLE_PRECISION_COMPLEX */ #endif /* WANT_SINGLE_PRECISION_COMPLEX */
......
...@@ -93,7 +93,7 @@ module elpa1_auxiliary_impl ...@@ -93,7 +93,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h" #include "../general/precision_macros.h"
function elpa_cholesky_real_double_impl (obj, a) result(success) 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 end function elpa_cholesky_real_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -105,7 +105,7 @@ module elpa1_auxiliary_impl ...@@ -105,7 +105,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h" #include "../general/precision_macros.h"
function elpa_cholesky_real_single_impl(obj, a) result(success) 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 end function elpa_cholesky_real_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
...@@ -132,7 +132,7 @@ module elpa1_auxiliary_impl ...@@ -132,7 +132,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced. !> The lower triangle is not referenced.
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_real_double_impl(obj, a) result(success) 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 end function elpa_invert_trm_real_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -159,7 +159,7 @@ module elpa1_auxiliary_impl ...@@ -159,7 +159,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_real_single_impl(obj, a) result(success) 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 end function elpa_invert_trm_real_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -188,7 +188,7 @@ module elpa1_auxiliary_impl ...@@ -188,7 +188,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_cholesky_complex_double_impl(obj, a) result(success) 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 end function elpa_cholesky_complex_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -216,7 +216,7 @@ module elpa1_auxiliary_impl ...@@ -216,7 +216,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_cholesky_complex_single_impl(obj, a) result(success) 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 end function elpa_cholesky_complex_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
...@@ -244,7 +244,7 @@ module elpa1_auxiliary_impl ...@@ -244,7 +244,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced. !> The lower triangle is not referenced.
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_complex_double_impl(obj, a) result(success) 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 end function elpa_invert_trm_complex_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -270,7 +270,7 @@ module elpa1_auxiliary_impl ...@@ -270,7 +270,7 @@ module elpa1_auxiliary_impl
!> The lower triangle is not referenced. !> The lower triangle is not referenced.
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_invert_trm_complex_single_impl(obj, a) result(success) 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 end function elpa_invert_trm_complex_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef COMPLEXCASE #undef COMPLEXCASE
...@@ -282,7 +282,7 @@ module elpa1_auxiliary_impl ...@@ -282,7 +282,7 @@ module elpa1_auxiliary_impl
#include "../general/precision_macros.h" #include "../general/precision_macros.h"
function elpa_mult_at_b_real_double_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, & function elpa_mult_at_b_real_double_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success) 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 end function elpa_mult_at_b_real_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
...@@ -327,7 +327,7 @@ module elpa1_auxiliary_impl ...@@ -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, & function elpa_mult_at_b_real_single_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success) 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 end function elpa_mult_at_b_real_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
...@@ -375,7 +375,7 @@ module elpa1_auxiliary_impl ...@@ -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, & function elpa_mult_ah_b_complex_double_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success) 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 end function elpa_mult_ah_b_complex_double_impl
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -423,7 +423,7 @@ module elpa1_auxiliary_impl ...@@ -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, & function elpa_mult_ah_b_complex_single_impl(obj, uplo_a, uplo_c, ncb, a, b, ldb, ldbCols, &
c, ldc, ldcCols) result(success) 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 end function elpa_mult_ah_b_complex_single_impl
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
...@@ -452,7 +452,7 @@ module elpa1_auxiliary_impl ...@@ -452,7 +452,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_solve_tridi_double_impl(obj, d, e, q) result(success) 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 end function
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -481,7 +481,7 @@ module elpa1_auxiliary_impl ...@@ -481,7 +481,7 @@ module elpa1_auxiliary_impl
!> \result succes logical, reports success or failure !> \result succes logical, reports success or failure
function elpa_solve_tridi_single_impl(obj, d, e, q) result(success) 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 end function
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
......
...@@ -158,8 +158,8 @@ module elpa1_compute ...@@ -158,8 +158,8 @@ module elpa1_compute
#define DOUBLE_PRECISION 1 #define DOUBLE_PRECISION 1
#include "../general/precision_macros.h" #include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90" #include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.X90" #include "elpa_reduce_add_vectors.F90"
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
#undef REALCASE #undef REALCASE
! single precision ! single precision
...@@ -169,8 +169,8 @@ module elpa1_compute ...@@ -169,8 +169,8 @@ module elpa1_compute
#define SINGLE_PRECISION 1 #define SINGLE_PRECISION 1
#include "../general/precision_macros.h" #include "../general/precision_macros.h"
#include "elpa_transpose_vectors.X90" #include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.X90" #include "elpa_reduce_add_vectors.F90"
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
#undef REALCASE #undef REALCASE
#endif #endif
...@@ -180,8 +180,8 @@ module elpa1_compute ...@@ -180,8 +180,8 @@ module elpa1_compute
#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_transpose_vectors.X90" #include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.X90" #include "elpa_reduce_add_vectors.F90"
#undef COMPLEXCASE #undef COMPLEXCASE
#undef DOUBLE_PRECISION #undef DOUBLE_PRECISION
...@@ -190,8 +190,8 @@ module elpa1_compute ...@@ -190,8 +190,8 @@ module elpa1_compute
#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_transpose_vectors.X90" #include "elpa_transpose_vectors.F90"
#include "elpa_reduce_add_vectors.X90" #include "elpa_reduce_add_vectors.F90"
#undef COMPLEXCASE #undef COMPLEXCASE
#undef SINGLE_PRECISION #undef SINGLE_PRECISION
...@@ -201,7 +201,7 @@ module elpa1_compute ...@@ -201,7 +201,7 @@ module elpa1_compute