Replace a ntill_stages_max with ntill_intensities_max.

ESCOMP · Dec 29, 2023 · 693750c · 693750c
1 parent d566b6d
commit 693750c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/soilbiogeochem/TillageMod.F90 b/src/soilbiogeochem/TillageMod.F90
@@ -145,7 +145,7 @@ subroutine readParams_netcdf(ncid)
     end select
 
     ! Read off of netcdf file
-    allocate(tempr(ntill_stages_max,ndecomp_pools_max,ntill_stages_max))
+    allocate(tempr(ntill_intensities_max,ndecomp_pools_max,ntill_stages_max))
     call ncd_io(trim(tString), tempr, 'read', ncid, readvar = readv, posNOTonfile = .true.)
     if (.not. readv) then
         call endrun(msg=trim(errCode)//trim(tString)//errMsg(__FILE__, __LINE__))