Merge pull request #14 from jakubjelinek/master

Fix a pasto - loop simd construct in Fortran is do simd rather than

Author: HenryJin

sources/Example_SIMD.5f.f

@@ -8,7 +8,7 @@ subroutine work( a, b, c,  n )
    integer :: i,j,n
    double precision :: a(n,n), b(n,n), c(n,n), tmp
 
-   !$omp for simd collapse(2) private(tmp)
+   !$omp do simd collapse(2) private(tmp)
    do j = 1,n
       do i = 1,n
          tmp = a(i,j) + b(i,j)