Improve ionization #47
3 changed files with 4 additions and 2 deletions
Fixing issue
Fixing an issue with reading tables led me to other issues with collisions that I think are fixed right now. I am testing with the 1D ionization model for ALPHIE and things seems to be working properly.
commit
4585390b50
|
|
@ -93,7 +93,7 @@ MODULE moduleTable
|
|||
f = self%fMax
|
||||
|
||||
ELSE
|
||||
i = MINLOC(x - self%x, 1)
|
||||
i = MINLOC(ABS(x - self%x), 1)
|
||||
deltaX = x - self%x(i)
|
||||
IF (deltaX < 0 ) THEN
|
||||
i = i - 1
|
||||
|
|
|
|||
|
|
@ -911,7 +911,9 @@ MODULE moduleMesh
|
|||
!Loop over collisions
|
||||
DO c = 1, interactionMatrix(k)%amount
|
||||
IF (rnd_real <= probabilityColl(c)) THEN
|
||||
!$OMP CRITICAL
|
||||
CALL interactionMatrix(k)%collisions(c)%obj%collide(part_i, part_j, vRel)
|
||||
!$OMP END CRITICAL
|
||||
|
||||
!If collisions are gonna be output, count the collision
|
||||
IF (collOutput) THEN
|
||||
|
|
|
|||
|
|
@ -362,7 +362,7 @@ MODULE moduleCollisions
|
|||
CALL sp%ionize(neutral)
|
||||
|
||||
CLASS DEFAULT
|
||||
! CALL criticalError(sp%name // " is not a neutral", 'collideBinaryIonization')
|
||||
CALL criticalError(sp%name // " is not a neutral", 'collideBinaryIonization')
|
||||
RETURN
|
||||
|
||||
END SELECT
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue