4 integer, parameter :: N
= 64
5 real, allocatable
:: a(:), b(:), c(:)
12 !$acc parallel async (0)
19 !$acc parallel async (1)
36 if (c(i
) .ne
. 2.0) call abort
39 !$acc kernels async (0)
46 !$acc kernels async (1)
63 if (c(i
) .ne
. 2.0) call abort