From be78fb555a6995f196899c6f363a833e5ed02295 Mon Sep 17 00:00:00 2001
From: holger <holger-grosshans@gmx.de>
Date: Tue, 21 Apr 2020 11:31:14 +0200
Subject: [PATCH] modified: src/particlesTransport.f90
---
src/particlesTransport.f90 | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/particlesTransport.f90 b/src/particlesTransport.f90
index 7105231..ea3fbd0 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
--
GitLab