From 9c5bd57607b4a6e1fa85aef373b7bd81de266616 Mon Sep 17 00:00:00 2001 From: Nick Featherstone Date: Mon, 19 Aug 2024 14:29:17 -0600 Subject: [PATCH] Small edit to comment. --- src/IO/Spherical_IO.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/IO/Spherical_IO.F90 b/src/IO/Spherical_IO.F90 index 800860a6..5e71e128 100755 --- a/src/IO/Spherical_IO.F90 +++ b/src/IO/Spherical_IO.F90 @@ -1721,7 +1721,7 @@ Subroutine Parse_Inds(indices_inout, indmax, indcount) jmin = indices_inout(i)+1 ! Only expand the subrange if the values of jmin and jmax - ! are consistent. + ! are consistent and if they fall within the grid bounds. If ((jmin .ge. 1) .and. (jmax .ge. jmin)) Then Do j = jmin,jmax If (j .le. indmax) Then