Fix distribcell index bug

This commit is contained in:
Sterling Harper 2018-08-27 20:09:48 -04:00
parent 452de390ba
commit 1de49c76e0

View file

@ -207,7 +207,7 @@ contains
if (found) then
index = p % coord(p % n_coord) % cell + 1
instance = p % cell_instance - 1
instance = p % cell_instance
err = 0
else
err = E_GEOMETRY