1 extern void abort (void);
2 extern int omp_get_num_threads (void);
16 parallel (int a
, int b
)
22 for (i
= 0; i
< 10; i
++)
23 for (j
= 0; j
< 5; j
++)
24 A
[i
][j
].y
.l
[3][3] = -10;
26 #pragma omp parallel shared (a, b, A) num_threads (5)
31 a
+= omp_get_num_threads ();
34 b
+= omp_get_num_threads ();
36 #pragma omp for private (j)
37 for (i
= 0; i
< 10; i
++)
38 for (j
= 0; j
< 5; j
++)
39 A
[i
][j
].y
.l
[3][3] += 20;
43 for (i
= 0; i
< 10; i
++)
44 for (j
= 0; j
< 5; j
++)
45 if (A
[i
][j
].y
.l
[3][3] != 10)