diff --git a/Solver/src/NavierStokesSolver/SpatialDiscretization.f90 b/Solver/src/NavierStokesSolver/SpatialDiscretization.f90
index bf52177db..f239a2b8d 100644
--- a/Solver/src/NavierStokesSolver/SpatialDiscretization.f90
+++ b/Solver/src/NavierStokesSolver/SpatialDiscretization.f90
@@ -529,12 +529,12 @@ subroutine TimeDerivative_ComputeQDot( mesh , particles, t)
                end associate
             end do
 !$omp end do
-!
-!           Add an MPI Barrier
-!           ------------------
-!$omp single
-            call mpi_barrier(MPI_COMM_WORLD, ierr)
-!$omp end single
+! !
+! !           Add an MPI Barrier
+! !           ------------------
+! !$omp single
+!             call mpi_barrier(MPI_COMM_WORLD, ierr)
+! !$omp end single
          end if
 #endif
 !
@@ -844,12 +844,12 @@ subroutine TimeDerivative_ComputeQDotHO( mesh , particles, t)
                end associate
             end do
 !$omp end do
-!
-!           Add an MPI Barrier
-!           ------------------
-!$omp single
-            call mpi_barrier(MPI_COMM_WORLD, ierr)
-!$omp end single
+! !
+! !           Add an MPI Barrier
+! !           ------------------
+! !$omp single
+!             call mpi_barrier(MPI_COMM_WORLD, ierr)
+! !$omp end single
          end if
 #endif
 !