diff --git a/applications/solvers/DNS/dnsFoam/dnsFoam.C b/applications/solvers/DNS/dnsFoam/dnsFoam.C
index 865af561..5d6c1dcb 100644
--- a/applications/solvers/DNS/dnsFoam/dnsFoam.C
+++ b/applications/solvers/DNS/dnsFoam/dnsFoam.C
@@ -83,7 +83,7 @@ int main(int argc, char *argv[])
 
         // --- PISO loop
 
-        for (int corr=1; corr<=1; corr++)
+        for (int corr=0; corr<nCorr; corr++)
         {
             volScalarField rAU(1.0/UEqn.A());
             surfaceScalarField rAUf("rAUf", fvc::interpolate(rAU));