From e07d38fdecf4ef27868434dc0b0298cb5a7a514d Mon Sep 17 00:00:00 2001 From: Denny Tjahjanto Date: Mon, 18 Feb 2008 10:41:37 +0000 Subject: [PATCH] ooops. missed nInner and nOuter as loop counters... --- trunk/debug.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/trunk/debug.f90 b/trunk/debug.f90 index 71f1b812b..8bc0a2c13 100644 --- a/trunk/debug.f90 +++ b/trunk/debug.f90 @@ -31,14 +31,14 @@ write(6,*) write(6,*) 'distribution_innerLoop :' - do i=1,nStress + do i=1,nInner if (debug_innerLoopDistribution(i) > 0) write(6,*) i,debug_innerLoopDistribution(i) enddo write(6,*) 'total',sum(debug_innerLoopDistribution) write(6,*) write(6,*) 'distribution_outerLoop :' - do i=1,nState + do i=1,nOuter if (debug_outerLoopDistribution(i) > 0) write(6,*) i,debug_outerLoopDistribution(i) enddo write(6,*) 'total',sum(debug_outerLoopDistribution)