mirror of
https://github.com/OpenMP/Examples.git
synced 2025-04-04 05:41:33 +01:00
15 lines
299 B
C
15 lines
299 B
C
/*
|
|
* @@name: apply_nested.1
|
|
* @@type: C
|
|
* @@operation: compile
|
|
* @@expect: success
|
|
* @@version: omp_6.0
|
|
*/
|
|
void nested_apply(double A[100])
|
|
{
|
|
#pragma omp tile sizes(10) \
|
|
apply(intratile: unroll partial(2) apply(reverse))
|
|
for (int i = 0; i < 100; ++i)
|
|
A[i] = A[i] + 1;
|
|
}
|