Commit 50289de2 authored by Andreas Marek's avatar Andreas Marek

Merge branch 'ELPA_GPU_FIX1' into fix_complex_kernel

parents fb4f406b 17a8afb1
......@@ -287,7 +287,7 @@ contains
endif
if (nblk .ne. 128) then
print *,"At the moment GPU version needs blocksize 128"
stop
error stop
endif
! set the neccessary parameters
......@@ -636,7 +636,7 @@ contains
endif
if (nblk .ne. 128) then
print *,"At the moment GPU version needs blocksize 128"
stop
error stop
endif
! some temporarilly checks until single precision works with all kernels
......@@ -944,7 +944,7 @@ function solve_evp_complex_2stage_single(na, nev, a, lda, ev, q, ldq, nblk, &
endif
if (nblk .ne. 128) then
print *,"At the moment GPU version needs blocksize 128"
stop
error stop
endif
! set the neccessary parameters
......@@ -1263,7 +1263,7 @@ function solve_evp_complex_2stage_single(na, nev, a, lda, ev, q, ldq, nblk, &
endif
if (nblk .ne. 128) then
print *,"At the moment GPU version needs blocksize 128"
stop
error stop
endif
! set the neccessary parameters
......
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