source: CIVL/examples/omp/region2.c

main
Last change on this file was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

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

  • Property mode set to 100644
File size: 1.1 KB
RevLine 
[6f87ebf]1#include <omp.h>
2#include <assert.h>
3#define N 10
4
5int main (int argc, char * argv[]){
6 int i;
7 int a[N];
8 int sum = 0;
9
10#pragma omp parallel
11{
12#pragma omp barrier
13 sum = 0;
14#pragma omp barrier
15 if (i > 0) {
16#pragma omp barrier
17 sum = sum + 1;
18 } else {
19#pragma omp barrier
20 sum = N;
21 }
22#pragma omp barrier
23 i = sum;
24}
25
26#pragma omp parallel
27{
28 sum = 0;
29 if (i > 0) {
30 sum = sum + 1;
31 } else {
32 sum = N;
33 }
34 i = sum;
35}
36
37#pragma omp parallel
38{
39 sum = 0;
40 if (i > 0) {
41#pragma omp barrier
42 sum = sum + 1;
43 } else {
44#pragma omp barrier
45 sum = N;
46 }
47 i = sum;
48}
49
50#pragma omp parallel
51{
52#pragma omp barrier
53 sum = 0;
54 if (i > 0) {
55 sum = sum + 1;
56 } else {
57 sum = N;
58 }
59#pragma omp barrier
60 i = sum;
61}
62
63#pragma omp parallel
64{
65 sum = 0;
66#pragma omp barrier
67 if (i > 0) {
68 sum = sum + 1;
69 } else {
70#pragma omp barrier
71 sum = N;
72 }
73#pragma omp barrier
74 i = sum;
75}
76
77#pragma omp parallel
78{
79#pragma omp barrier
80 sum = 0;
81#pragma omp barrier
82 if (i > 0) {
83#pragma omp barrier
84 sum = sum + 1;
85 } else {
86 sum = N;
87 }
88 i = sum;
89}
90
91}
Note: See TracBrowser for help on using the repository browser.