Bugfix: Update FATES_VEGC_APPF even if cohort is new.

See Issue #1261.
NGEET · Oct 11, 2024 · bf3684d · bf3684d
1 parent 8375545
commit bf3684d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/main/FatesHistoryInterfaceMod.F90 b/main/FatesHistoryInterfaceMod.F90
@@ -4860,13 +4860,13 @@ subroutine update_history_dyn2_ageclass(this,nc,nsites,sites,bc_in)
              total_m  = alive_m + store_m + struct_m
              hio_biomass_si_age(io_si,cpatch%age_class) = hio_biomass_si_age(io_si,cpatch%age_class) &
                   + total_m * weight
+             hio_biomass_si_agepft(io_si,iagepft) = hio_biomass_si_agepft(io_si,iagepft) + &
+                  total_m * weight
 
              if (.not. (ccohort%isnew)) then
                 hio_npp_si_agepft(io_si,iagepft) = hio_npp_si_agepft(io_si,iagepft) + &
                      ccohort%npp_acc_hold / days_per_year / sec_per_day &  ! [kgC/indiv/yr] -> [kgC/s]
                      * weight
-                hio_biomass_si_agepft(io_si,iagepft) = hio_biomass_si_agepft(io_si,iagepft) + &
-                     total_m * weight
 
                 ! Canopy vs. understory variables
                 mort = ccohort%SumMortForHistory(per_year = .true.)