Уменьшение суммы OpenACC выводит сумму приращений при каждом выполнении

Почему следующий код:

#include <iostream>

int main(int argc, char const *argv[])
{
int sum = 0;
int *array;
array = new int [100];

#pragma acc enter data create(array[0:100],sum)

#pragma acc parallel loop present(array[0:100])
for (int i = 0; i < 100; ++i)
{
array[i] = 1;
}

#pragma acc parallel loop present(array[0:100],sum) reduction(+:sum)
for (int i = 0; i < 100; ++i)
{
sum += array[i];
}

#pragma acc exit data delete(array[0:100]) copyout(sum)

std::cout << sum << std::endl;

return 0;
}

Возвращать разные результаты при каждом выполнении?

$ pgcpp -acc -Minfo main.cpp
main:
7, Generating enter data create(sum)
Generating enter data create(array[:100])
Generating present(array[:100])
Accelerator kernel generated
12, #pragma acc loop gang, vector(256) /* blockIdx.x threadIdx.x */
7, Generating Tesla code
15, Generating present(array[:100])
Generating present(sum)
Accelerator kernel generated
18, #pragma acc loop gang, vector(256) /* blockIdx.x threadIdx.x */
20, Sum reduction generated for sum
15, Generating Tesla code
25, Generating exit data copyout(sum)
Generating exit data delete(array[:100])
$ ./a.out
100
$ ./a.out
200
$ ./a.out
300
$ ./a.out
400

Согласно стандарту OpenACC:

В директиве exit data данные копируются обратно в локальную память и
перераспределена.

Казалось бы, что sum является не освобождается и используется повторно (и увеличивается) при каждом запуске программы. Кроме того, + оператор в reduction Директива инициализирует редукционную переменную в 0так что это не должно происходить, даже если sum не были распределены между казнями.

Я могу избежать этого поведения, используя copyin вместо create за sum в enter data директива или настройка sum = 0 в одной банде, в одном рабочем ядре:

#pragma acc parallel present(sum) num_gangs(1) num_workers(1)
sum = 0;

Но это неудовлетворительно, так как требует либо дорогостоящего хоста для копирования данных устройства, либо соответственно запуска ядра. Почему моя программа ведет себя так?