(j3.2006) this_image( team=zzz), for zzz not current or an ancestor

Anton Shterenlikht mexas
Wed May 31 05:38:22 EDT 2017


use iso_fortran_env
type( team_type ) :: team_new
form team( 1 + mod(this_image(),2), team_new )
print *, this_image( team_new )
end

I think this program is not conforming because
CD 16.9.190p3 [435:10-11] has:
"TEAM ... scalar ... whose value identifies
the current or an ancestor team."
In this case team_new is neither.
Correct?

Are implementers likely to issue a runtime error at this point?

Anton



More information about the J3 mailing list