[Commits] [svn:einsteintoolkit] GRHydro/branches/divclean/src/ (Rev. 235)

[tanja.bode at physics.gatech.edu]

User: tbode
Date: 2011/04/27 05:56 PM

Modified:
 /branches/divclean/src/
  GRHydro_ReconstructPoly.F90

Log:
 Move erroneous end do statements.

File Changes:

Directory: /branches/divclean/src/
==================================

File [modified]: GRHydro_ReconstructPoly.F90
Delta lines: +1 -1
===================================================================
--- branches/divclean/src/GRHydro_ReconstructPoly.F90	2011-04-27 22:37:19 UTC (rev 234)
+++ branches/divclean/src/GRHydro_ReconstructPoly.F90	2011-04-27 22:56:11 UTC (rev 235)
@@ -693,6 +693,7 @@
             end if
           end do
         end do
+       end do
         !$OMP END PARALLEL DO
      else if (flux_direction == 2) then
         !$OMP PARALLEL DO PRIVATE(i, j)
@@ -764,7 +765,6 @@
               end do
            end do
         end do
-      end do
       !$OMP END PARALLEL DO
     else if (flux_direction == 3) then
       !$OMP PARALLEL DO PRIVATE(i, j)