From 1de49c76e0250d32bf1ea349eab67b330f232e8e Mon Sep 17 00:00:00 2001 From: Sterling Harper Date: Mon, 27 Aug 2018 20:09:48 -0400 Subject: [PATCH] Fix distribcell index bug --- src/api.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/api.F90 b/src/api.F90 index f089555bce..0fa537e528 100644 --- a/src/api.F90 +++ b/src/api.F90 @@ -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