Commit 17a8afb1 authored by Andreas Marek's avatar Andreas Marek
Browse files

Merge branch 'ELPA_GPU' of gitlab.mpcdf.mpg.de:elpa/elpa into ELPA_GPU

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