ooops. missed nInner and nOuter as loop counters...

This commit is contained in:
Denny Tjahjanto 2008-02-18 10:41:37 +00:00
parent 9c9cdeb58b
commit e07d38fdec
1 changed files with 2 additions and 2 deletions

View File

@ -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)