A.7 使用削減子句

下列範例會示範簡化子句 (一節 2.7.2.6 第 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];
    }