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

Number of collisions per collision pair

Browse source 
Now the number of collisions is calculated per species pair. This allows
that the randomly particles selected for collisions do not have
collisions assigned.
This commit is contained in:
Jorge Gonzalez 2022-04-23 19:00:33 +02:00
commit 4e9514876e
10 changed files with 111 additions and 46 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/modules/moduleInput.f90
View file

@ -685,7 +685,7 @@ MODULE moduleInput
CALL config%info(object // '.cTypes', found, n_children = nCollisions)
ij = interactionIndex(pt_i,pt_j)
!Allocates the required number of collisions per each pair of species ij
CALL interactionMatrix(ij)%init(nCollisions)
CALL interactionMatrix(ij)%init(nCollisions, pt_i, pt_j)
DO k = 1, nCollisions
WRITE (kString, '(I2)') k