From c4674859fbcc8b401f0638346f600d5bcaf4141a Mon Sep 17 00:00:00 2001 From: Joseph Hughes Date: Sun, 18 Feb 2024 17:01:27 -0600 Subject: [PATCH] * fprettify --- src/Model/GroundWaterFlow/gwf-sfr.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Model/GroundWaterFlow/gwf-sfr.f90 b/src/Model/GroundWaterFlow/gwf-sfr.f90 index 98b968c2ba8..27fc3e60f67 100644 --- a/src/Model/GroundWaterFlow/gwf-sfr.f90 +++ b/src/Model/GroundWaterFlow/gwf-sfr.f90 @@ -2395,7 +2395,7 @@ subroutine sfr_cq(this, x, flowja, iadv) do i = this%ia(n) + 1, this%ia(n + 1) - 1 if (this%idir(i) > 0) cycle n2 = this%ja(i) - if (this%iboundpak(n2) == 0) cycle + if (this%iboundpak(n2) == 0) cycle qext = DZERO exit end do