/*
* @@name:	async_target.1c
* @@type:	C
* @@compilable:	yes
* @@linkable:	no
* @@expect:	success
*/
#pragma omp declare target
float F(float);
#pragma omp end declare target
#define N 1000000000
#define CHUNKSZ 1000000
void init(float *, int);
float Z[N];
void pipedF()
{
   int C, i;
   init(Z, N);
   for (C=0; C<N; C+=CHUNKSZ)
   {
      #pragma omp task
      #pragma omp target map(Z[C:CHUNKSZ])
      #pragma omp parallel for
      for (i=0; i<CHUNKSZ; i++)
         Z[i] = F(Z[i]);
   }
   #pragma omp taskwait
}