Updated some text

NGEET · Jun 10, 2024 · e407b81 · e407b81
1 parent 7a3c437
commit e407b81
Showing 1 changed file with 8 additions and 4 deletions.
diff --git a/main/FatesHistoryInterfaceMod.F90 b/main/FatesHistoryInterfaceMod.F90
@@ -4937,7 +4937,8 @@ subroutine update_history_hifrq1(this,nc,nsites,sites,bc_in,bc_out,dt_tstep)
          hio_tveg                     => this%hvars(ih_tveg_si)%r81d)
 
 
-      ! Move this to the interface for consistency (rgk 0524)
+      ! THIS CAN BE REMOVED WHEN BOTH CTSM AND E3SM CALL FLUSH_ALL_HVARS
+      ! THIS IS NOT A LIABILITY, IT IS JUST REDUNDANT
       call this%flush_hvars(nc,upfreq_in=group_hifr_simple)
 
       dt_tstep_inv = 1.0_r8/dt_tstep
@@ -5223,7 +5224,8 @@ subroutine update_history_hifrq2(this,nc,nsites,sites,bc_in,bc_out,dt_tstep)
          hio_laisha_si_can                    => this%hvars(ih_laisha_si_can)%r82d )
 
 
-      ! Move this to the interface for consistency (rgk 0524)
+      ! THIS CAN BE REMOVED WHEN BOTH CTSM AND E3SM CALL FLUSH_ALL_HVARS
+      ! THIS IS NOT A LIABILITY, IT IS JUST REDUNDANT 
       call this%flush_hvars(nc,upfreq_in=group_hifr_complx)
 
       dt_tstep_inv = 1.0_r8/dt_tstep
@@ -5655,7 +5657,8 @@ subroutine update_history_hydraulics(this,nc,nsites,sites,bc_in,dt_tstep)
 
     if_hifrq0: if(hlm_hist_level_hifrq>0) then
 
-       ! Move this to the interface for consistency (rgk 0524)
+       ! THIS CAN BE REMOVED WHEN BOTH CTSM AND E3SM CALL FLUSH_ALL_HVARS
+       ! THIS IS NOT A LIABILITY, IT IS JUST REDUNDANT 
        call this%flush_hvars(nc,upfreq_in=group_hydr_simple)
 
        associate(   hio_h2oveg_hydro_err_si   => this%hvars(ih_h2oveg_hydro_err_si)%r81d, &
@@ -5762,7 +5765,8 @@ subroutine update_history_hydraulics(this,nc,nsites,sites,bc_in,dt_tstep)
             hio_rootuptake50_scpf     => this%hvars(ih_rootuptake50_scpf)%r82d, &
             hio_rootuptake100_scpf    => this%hvars(ih_rootuptake100_scpf)%r82d )
 
-         ! Move this to the interface for consistency (rgk 0524)
+         ! THIS CAN BE REMOVED WHEN BOTH CTSM AND E3SM CALL FLUSH_ALL_HVARS
+         ! THIS IS NOT A LIABILITY, IT IS JUST REDUNDANT 
          call this%flush_hvars(nc,upfreq_in=group_hydr_complx)
 
          do s = 1,nsites