JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed bug with number of collisions not computing correctly because

Browse source 
INT/REAL conversions.

Number of collisions now take into account the different weight of
particles inside a cell without impacting performance.
This commit is contained in:
Jorge Gonzalez 2020-10-18 10:26:58 +02:00
commit e14c3ef65b
3 changed files with 32 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/modules/moduleMesh.f95
View file

@ -95,6 +95,8 @@ MODULE moduleMesh
INTEGER(KIND=OMP_LOCK_KIND):: lock
!Number of collisions per volume
INTEGER:: nColl = 0
!Total weight of particles inside cell
REAL(8):: totalWeight = 0.D0
CONTAINS
PROCEDURE(initVol_interface), DEFERRED, PASS:: init
PROCEDURE(scatter_interface), DEFERRED, PASS:: scatter