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
1c2e6185
Commit
1c2e6185
authored
Jul 07, 2017
by
Andreas Marek
Browse files
Let only task 0 print
parent
ea1580e5
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
test/Fortran/test.F90
View file @
1c2e6185
...
...
@@ -251,10 +251,10 @@ program test
endif
status
=
check_correctness
(
na
,
nev
,
as
,
z
,
ev
,
sc_desc
,
myid
)
if
(
status
/
=
0
)
then
print
*
,
"Result incorrect!"
if
(
myid
==
0
)
print
*
,
"Result incorrect!"
call
exit
(
status
)
endif
print
*
,
""
if
(
myid
==
0
)
print
*
,
""
#ifdef TEST_ALL_KERNELS
a
(:,:)
=
as
(:,:)
...
...
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