1! RUN: %S/test_errors.sh %s %t %flang -fopenmp 2! REQUIRES: shell 3! OpenMP Version 4.5 4! 2.13.9 Depend Clause 5! Coarrays are not supported in depend clause 6 7program omp_depend_coarray 8 integer :: a(3)[*], b(3) , k 9 10 a(:) = this_image() 11 b(:) = a(:)[1] 12 k = 10 13 14 !$omp parallel 15 !$omp single 16 !ERROR: Coarrays are not supported in DEPEND clause 17 !$omp task shared(b) depend(out: a(:)[1]) 18 b = a + k 19 !$omp end task 20 !$omp end single 21 !$omp end parallel 22 23 print *, a, b 24 25end program omp_depend_coarray 26