Skip to content
GitLab
Menu
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
b286352c
Commit
b286352c
authored
Apr 20, 2017
by
Andreas Marek
Browse files
Set COMPLEX_GPU_KERNEL in complex case
parent
e530fe3b
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/elpa_t.F90
View file @
b286352c
...
...
@@ -683,7 +683,7 @@ module elpa_type
useGPU
=
.false.
endif
THIS_ELPA_KERNEL_API
=
self
%
get
(
"
real
_kernel"
,
success_internal
)
THIS_ELPA_KERNEL_API
=
self
%
get
(
"
complex
_kernel"
,
success_internal
)
if
(
success_internal
.ne.
ELPA_OK
)
then
print
*
,
"Could not querry kernel"
stop
...
...
@@ -791,7 +791,7 @@ module elpa_type
useGPU
=
.false.
endif
THIS_ELPA_KERNEL_API
=
self
%
get
(
"
real
_kernel"
,
success_internal
)
THIS_ELPA_KERNEL_API
=
self
%
get
(
"
complex
_kernel"
,
success_internal
)
if
(
success_internal
.ne.
ELPA_OK
)
then
print
*
,
"Could not querry kernel"
stop
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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