35   const int device = omp_get_default_device();  in main()  local
61   int *d_A = (int *)omp_target_alloc(N * sizeof(int), device);  in main()
62   int *d_B = (int *)omp_target_alloc(N * sizeof(int), device);  in main()
63   int *d_C = (int *)omp_target_alloc(N * sizeof(int), device);  in main()
68   omp_target_memcpy(d_B, pB, N * sizeof(int), 0, 0, device,  in main()
70   omp_target_memcpy(d_C, pC, N * sizeof(int), 0, 0, device,  in main()
73 #pragma omp target is_device_ptr(d_A, d_B, d_C) device(device)  in main()
82                     device);  in main()
103   if (!omp_target_is_present(B, device)) {  in main()
105     int rc = omp_target_associate_ptr(B, d_B, N * sizeof(int), 0, device);  in main()
111   if (!omp_target_is_present(C, device)) {  in main()
113     int rc = omp_target_associate_ptr(C, d_C, N * sizeof(int), 0, device);  in main()
120 #pragma omp target data map(from : B, C) device(device)  in main()
123            omp_target_is_present(A, device) ? "" : " not");  in main()
125            omp_target_is_present(B, device) ? "" : " not");  in main()
127            omp_target_is_present(C, device) ? "" : " not");  in main()
129 #pragma omp target map(from : A) device(device)  in main()
141   if (omp_target_is_present(B, device)) {  in main()
143     int rc = omp_target_disassociate_ptr(B, device);  in main()
146   if (omp_target_is_present(C, device)) {  in main()
148     int rc = omp_target_disassociate_ptr(C, device);  in main()
164   omp_target_free(d_A, device);  in main()
165   omp_target_free(d_B, device);  in main()
166   omp_target_free(d_C, device);  in main()