A.7 Usando a cláusula reduction

O exemplo a seguir demonstra a cláusula de redução (seção 2.7.2.6 na página 28):

#pragma omp parallel for private(i) shared(x, y, n) \
                         reduction(+: a, b)
    for (i=0; i<n; i++) {
        a = a + x[i];
        b = b + y[i];
    }