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

Fixing issue

Browse source 
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.
This commit is contained in:
Jorge Gonzalez 2023-11-21 09:53:36 +01:00
commit 4585390b50
3 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/modules/common/moduleTable.f90
View file

@ -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