Remove unused variables

emorway-usgs · Dec 6, 2024 · 0025c3a · 0025c3a
1 parent 5049af0
commit 0025c3a
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/Model/GroundWaterEnergy/gwe-uze.f90 b/src/Model/GroundWaterEnergy/gwe-uze.f90
@@ -160,9 +160,8 @@ subroutine find_uze_package(this)
     class(GweUzeType) :: this
     ! -- local
     class(BndType), pointer :: packobj
-    integer(I4B) :: ip, icount, nuz
+    integer(I4B) :: ip, icount
     integer(I4B) :: nbudterm
-    integer(I4B) :: idxbudgwf
     character(len=LINELENGTH) :: errmsg
     logical :: found
     !