Account for patch averaging in total LAI units

NGEET · Feb 1, 2023 · 669ba80 · 669ba80
1 parent 209cf6e
commit 669ba80
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/main/FatesHistoryInterfaceMod.F90 b/main/FatesHistoryInterfaceMod.F90
@@ -2653,7 +2653,7 @@ subroutine update_history_dyn(this,nc,nsites,sites,bc_in)
          hio_npatches_si_age(io_si,cpatch%age_class) = hio_npatches_si_age(io_si,cpatch%age_class) + 1._r8
 
          hio_lai_si(io_si) = hio_lai_si(io_si) + sum( cpatch%canopy_area_profile(:,:,:) * cpatch%elai_profile(:,:,:) ) * &
-              cpatch%total_canopy_area / cpatch%area
+              cpatch%total_canopy_area * AREA_INV
 
          if ( ED_val_comp_excln .lt. 0._r8 ) then ! only valid when "strict ppa" enabled
             hio_zstar_si_age(io_si,cpatch%age_class) = hio_zstar_si_age(io_si,cpatch%age_class) &