mirror of
https://github.com/OpenMP/Examples.git
synced 2025-04-10 08:22:11 +01:00
46 lines
677 B
C
46 lines
677 B
C
/*
|
|
* @@name: atomic.1
|
|
* @@type: C
|
|
* @@operation: link
|
|
* @@expect: success
|
|
* @@version: omp_3.1
|
|
*/
|
|
float work1(int i)
|
|
{
|
|
return 1.0 * i;
|
|
}
|
|
|
|
float work2(int i)
|
|
{
|
|
return 2.0 * i;
|
|
}
|
|
|
|
void atomic_example(float *x, float *y, int *index, int n)
|
|
{
|
|
int i;
|
|
|
|
#pragma omp parallel for shared(x, y, index, n)
|
|
for (i=0; i<n; i++) {
|
|
#pragma omp atomic update
|
|
x[index[i]] += work1(i);
|
|
y[i] += work2(i);
|
|
}
|
|
}
|
|
|
|
int main()
|
|
{
|
|
float x[1000];
|
|
float y[10000];
|
|
int index[10000];
|
|
int i;
|
|
|
|
for (i = 0; i < 10000; i++) {
|
|
index[i] = i % 1000;
|
|
y[i]=0.0;
|
|
}
|
|
for (i = 0; i < 1000; i++)
|
|
x[i] = 0.0;
|
|
atomic_example(x, y, index, 10000);
|
|
return 0;
|
|
}
|