We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 14e35bf commit ff6b124Copy full SHA for ff6b124
coarray/pi.f90
@@ -42,7 +42,7 @@ program coarray_pi
42
! print *,x,f,psum
43
end do
44
45
-! --- co_sum is much simpler, but not working on ifort 2017 yet
+! --- co_sum is much simpler, but not included even in ifort 2019
46
call co_sum(psum)!, stat=stat,errmsg=emsg)
47
!if (stat /= 0) then
48
! write (stderr,*) emsg
0 commit comments