Commit e62678d3 authored by Andreas Marek's avatar Andreas Marek

Error in complex single precision

The thread_width was not set correctly
parent 96363a5e
......@@ -3156,7 +3156,7 @@
if (useGPU) then
stripe_width = 256
else
#ifdef DOUBLE_PRECISION_REAL
#ifdef DOUBLE_PRECISION_COMPLEX
stripe_width = 48 ! Must be a multiple of 2
#else
stripe_width = 48 ! Must be a multiple of 4
......@@ -3190,7 +3190,7 @@
#endif /* WITH_OPENMP */
if (.not.(useGPU)) then
#ifdef DOUBLE_PRECISION_REAL
#ifdef DOUBLE_PRECISION_COMPLEX
stripe_width = ((stripe_width+1)/2)*2 ! Must be a multiple of 2 because of AVX/SSE memory alignment of 32 bytes
! (2 * sizeof(double complex) == 32)
#else
......
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