1!RUN: %python %S/../test_errors.py %s %flang -fopenmp 2! OpenMP Version 4.5 3! 2.7.1 Schedule Clause 4program omp_doSchedule 5 integer :: i,n 6 real :: a(100), y(100), z(100) 7 integer,parameter :: b = 10 8 integer,parameter :: c = 11 9 !ERROR: The chunk size of the SCHEDULE clause must be a positive integer expression 10 !$omp do schedule(static,b-c) 11 do i=2,n+1 12 y(i) = z(i-1) + a(i) 13 end do 14 !$omp end do 15end program omp_doSchedule 16