Skip to content

Commit

Permalink
remove npp by age from high frequency history
Browse files Browse the repository at this point in the history
This is clean up from the deconflict merge
  • Loading branch information
glemieux committed Jan 7, 2025
1 parent cd6931f commit 69e7433
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions main/FatesHistoryInterfaceMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -5136,7 +5136,6 @@ subroutine update_history_hifrq2(this,nc,nsites,sites,bc_in,bc_out,dt_tstep)
hio_resp_g_understory_si_scls => this%hvars(ih_resp_g_understory_si_scls)%r82d, &
hio_resp_m_understory_si_scls => this%hvars(ih_resp_m_understory_si_scls)%r82d, &
hio_gpp_si_age => this%hvars(ih_gpp_si_age)%r82d, &
hio_npp_si_age => this%hvars(ih_npp_si_age)%r82d, &
hio_gpp_si_landuse => this%hvars(ih_gpp_si_landuse)%r82d, &
hio_npp_si_landuse => this%hvars(ih_npp_si_landuse)%r82d, &
hio_c_stomata_si_age => this%hvars(ih_c_stomata_si_age)%r82d, &
Expand Down Expand Up @@ -5255,9 +5254,6 @@ subroutine update_history_hifrq2(this,nc,nsites,sites,bc_in,bc_out,dt_tstep)
hio_gpp_si_age(io_si,cpatch%age_class) = hio_gpp_si_age(io_si,cpatch%age_class) &
+ ccohort%gpp_tstep * ccohort%n * dt_tstep_inv

hio_npp_si_age(io_si,cpatch%age_class) = hio_npp_si_age(io_si,cpatch%age_class) &
+ ccohort%npp_acc_hold * ccohort%n * dt_tstep_inv

if (cpatch%land_use_label .gt. nocomp_bareground_land) then
hio_gpp_si_landuse(io_si,cpatch%land_use_label) = hio_gpp_si_landuse(io_si,cpatch%land_use_label) &
+ ccohort%gpp_tstep * ccohort%n * dt_tstep_inv
Expand Down

0 comments on commit 69e7433

Please sign in to comment.