/* * @@name: declare_target.3 * @@type: C * @@operation: compile * @@expect: success * @@version: omp_5.1 */ #define N 1000 #pragma omp begin declare target float p[N], v1[N], v2[N]; #pragma omp end declare target extern void init(float *, float *, int); extern void output(float *, int); void vec_mult() { int i; init(v1, v2, N); #pragma omp target update to(v1, v2) #pragma omp target #pragma omp parallel for for (i=0; i