initialize nlist to zero (#284)

MODFLOW-USGS · Jan 6, 2020 · b81a177 · b81a177
1 parent f081258
commit b81a177
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/Utilities/BudgetTerm.f90 b/src/Utilities/BudgetTerm.f90
@@ -76,11 +76,10 @@ subroutine initialize(this, flowtype, text1id1, text2id1, &
     this%text1id2 = text1id2
     this%text2id2 = text2id2
     this%maxlist = maxlist
-    this%nlist = 0
     this%olconv1 = olconv1
     this%olconv2 = olconv2
     this%naux = naux
-    this%nlist = maxlist
+    this%nlist = 0
     call this%allocate_arrays()
     if (present(auxtxt)) this%auxtxt(:) = auxtxt(1:naux)
   end subroutine initialize