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

Trying to fix weighting scheme

Browse source 
Now particles can be split to increase statistics when they enter a
smaller cell. However, this only has an effect for collisions.

Still, I have to rethink a lot about this feature.
This commit is contained in:
Jorge Gonzalez 2022-12-29 19:32:38 +01:00
commit 905d3f94a5
3 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/modules/solver/moduleSolver.f90
View file

@ -388,11 +388,12 @@ MODULE moduleSolver
REAL(8):: fractionVolume, pSplit
!If particle changes volume to smaller cell
IF (volOld%volume > volNew%volume) THEN
IF (volOld%volume > volNew%volume .AND. &
part%weight >= part%species%weight*1.0D-1) THEN
fractionVolume = volOld%volume/volNew%volume
!Calculate probability of splitting particle
pSplit = 1.D0 - DEXP(-fractionVolume)
pSplit = 1.D0 - DEXP(-fractionVolume*1.0D-1)
IF (random() < pSplit) THEN
!Split particle in two