У меня есть довольно простой фрагмент кода:
$acc data copy(a(:),b(:))
$acc kernels
$acc loop vector
do i=1,1000
x = a(i)
b(i) = sqrt(x)
enddo
$acc end kernels
$acc end data
И, конечно, я мог бы легко обойтись x
, но это пример, и x
является сутью моего вопроса: каждый ли поток здесь автоматически получает свою собственную копию x
, или я должен объявить его частным, чтобы сохранить различные темы от затирания его?