1 /* { dg-do run } */
2 
3 #include <stdio.h>
4 void
work(int k)5 work (int k)
6 {
7 #pragma omp ordered
8   printf (" %d\n", k);
9 }
10 
11 void
a21(int lb,int ub,int stride)12 a21 (int lb, int ub, int stride)
13 {
14   int i;
15 #pragma omp parallel for ordered schedule(dynamic)
16   for (i = lb; i < ub; i += stride)
17     work (i);
18 }
19 
20 int
main()21 main ()
22 {
23   a21 (0, 100, 5);
24   return 0;
25 }
26