source: CIVL/examples/omp/parallelfor.c@ d0ef687

1.23 2.0 main test-branch
Last change on this file since d0ef687 was 9ee762a, checked in by Matthew B. Dwyer <matthewbdwyer@…>, 12 years ago

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@883 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100755
File size: 659 bytes
Line 
1#include <omp.h>
2
3#define N 10
4
5int main (int argc, char *argv[]) {
6 double a[N], b[N];
7 int i, sum;
8
9 /*
10#pragma omp parallel for
11 for (i=0; i < N; i++) {
12 a[i] = 0.0;
13 b[i] = a[i];
14 b[i] = a[i] + b[i];
15 }
16 */
17
18#pragma omp parallel for
19 for (i=0; i < N-1; i++)
20 b[i+1] = a[i+1] + 2*i;
21
22 /*
23#pragma omp parallel for
24 for (i=0; i < N-1; i++)
25 a[i+1] = a[1+i] + 1;
26 //a[i+2-1] = a[(-2*3) + 2*i - i + 7] + 1;
27
28
29#pragma omp parallel for private(sum)
30 for (i=0; i < N; i++)
31 sum = sum + i;
32
33#pragma omp parallel for
34 for (i=0; i < N; i++)
35 sum = sum + i;
36 */
37
38}
Note: See TracBrowser for help on using the repository browser.