diff --git a/src/particlesTransport.f90 b/src/particlesTransport.f90 index 7105231da401a1ea8541deedea49b9de2d35824d..ea3fbd0e16643e4ef936eedf38c58f9d53a00f76 100644 --- a/src/particlesTransport.f90 +++ b/src/particlesTransport.f90 @@ -357,7 +357,7 @@ r3n1,r3n2,rxx,projvtox,srel,projvton, & closestrelvelo,fracdt, & vex,vey,vez,vnx,vny,vnz - integer :: n1,n2,numcol,ip,jp,lp,m1,m2,i,j,l + integer :: n1,n2,numcol,ip,jp,lp,m1,m2,i,j,l,syncSumI numcol=0 @@ -482,6 +482,7 @@ 1 enddo 3 enddo + numcol=syncSumI(numcol) if (myid.eq.0) write(*,'(a,i9)',advance='no') & ' |collide =',numcol