Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
elpa
elpa
Commits
eba83535
Commit
eba83535
authored
May 20, 2017
by
Andreas Marek
Browse files
Single complex in C should be complex float
parent
1e2e9430
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/elpa2/legacy_interface/elpa_2stage_c_interface.F90
View file @
eba83535
...
...
@@ -192,7 +192,7 @@
#define COMPLEXCASE 1
#undef DOUBLE_PRECISION
#define SINGLE_PRECISION 1
!lc> int elpa_solve_evp_complex_2stage_single_precision(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk,
!lc> int elpa_solve_evp_complex_2stage_single_precision(int na, int nev, complex
float
*a, int lda, float *ev, complex
float
*q, int ldq, int nblk,
!lc> int matrixCols, int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int THIS_COMPLEX_ELPA_KERNEL_API, int useGPU);
#include "../../general/precision_macros.h"
...
...
src/elpa_driver/legacy_interface/elpa_driver_c_interface.F90
View file @
eba83535
...
...
@@ -198,7 +198,7 @@
#define COMPLEXCASE 1
#define SINGLE_PRECISION 1
#undef DOUBLE_PRECISION
!lc> int elpa_solve_evp_complex_single(int na, int nev, complex *a, int lda, float *ev, complex *q, int ldq, int nblk, int matrixCols,
!lc> int elpa_solve_evp_complex_single(int na, int nev, complex
float
*a, int lda, float *ev, complex
float
*q, int ldq, int nblk, int matrixCols,
!lc> int mpi_comm_rows, int mpi_comm_cols, int mpi_comm_all, int THIS_COMPLEX_ELPA_KERNEL_API, int useGPU, char *method);
#include "../../general/precision_macros.h"
#include "./elpa_driver_c_interface_template.X90"
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment