adding soil_layer_index variable initialization

NGEET · Oct 28, 2020 · 19702e3 · 19702e3
1 parent b1f9b02
commit 19702e3
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/biogeochem/EDPhysiologyMod.F90 b/biogeochem/EDPhysiologyMod.F90
@@ -2323,9 +2323,10 @@ subroutine CWDOut( litt, fragmentation_scaler, nlev_eff_decomp )
 
     !
     ! !LOCAL VARIABLES:
-    integer :: c
-    integer :: ilyr
-    integer :: dcmpy
+    integer :: c                       ! Fuel size class index
+    integer :: ilyr                    ! Soil layer index
+    integer :: dcmpy                   ! Decomposibility pool indexer
+    integer :: soil_layer_index = 1    ! Soil layer index associated with above ground litter
     !----------------------------------------------------------------------