Intel® Fortran Compiler 16.0 User and Reference Guide
Insert a "%s parallel private(%s)" statement right before the loop at line %d to parallelize the loop.
Add "!DIR$ PARALLEL PRIVATE" before the specified loop. This directive enables the parallelization of the loop at the specified line.
In this case, the compiler does not parallelize the loop since it cannot determine whether m1 >= m2.
If you know that this property is true, and that no element of W is fetched before it is written to after the loop, then you can use the recommended directive.
If you determine it is safe to do so, you can add the directive as follows:
subroutine foo (A, B, C, n, m1, m2) real (4) A(10000, 10), B(10000, 10), C(10000, 10) integer n, m1, m2 real W(1000) integer i, j !DIR$ PARALLEL PRIVATE (W) do i=1,n do j=1,m1 W(j) = A(j,i) * B(j,i) end do do j=1,m2 C(j,i) = W(j) + 1.0 end do end
Before an element of an array can be fetched in the loop, there must have been a previous store to it during the same loop iteration. In addition, if an element is fetched after the loop, there must have been a previous write to it before the fetch after the loop.