Searched refs:a_3d_c (Results 1 - 2 of 2) sorted by relevance

/haiku-buildtools/gcc/libgomp/testsuite/libgomp.oacc-fortran/
H A Dlib-10.f908 complex a_3d_c(10, 10, 10) variable in program:main
22 call set3d (.FALSE., a_3d_i, a_3d_c, a_3d_r)
25 call acc_copyin (a_3d_c)
29 if (acc_is_present (a_3d_c) .neqv. .TRUE.) call abort
36 if (acc_is_present (a_3d_c(i, j, k), i_size) .neqv. .TRUE.) call abort
H A Dlib-8.f909 complex a_3d_c(10, 10, 10) variable in program:main
23 call set3d (.FALSE., a_3d_i, a_3d_c, a_3d_r)
26 call acc_copyin (a_3d_c)
30 if (acc_is_present (a_3d_c) .neqv. .TRUE.) call abort
37 if (acc_is_present (a_3d_c(i, j, k), i_size) .neqv. .TRUE.) call abort

Completed in 53 milliseconds