diff --git a/src/main/clm_driver.F90 b/src/main/clm_driver.F90 index 6afb0c0003..561bbe0dff 100644 --- a/src/main/clm_driver.F90 +++ b/src/main/clm_driver.F90 @@ -1058,14 +1058,6 @@ subroutine clm_drv(doalb, nextsw_cday, declinp1, declin, rstwr, nlend, rdate, ro end if ! use_fates branch - - if ( use_fates ) then - - - - end if - - ! ============================================================================ ! Create summaries of water diagnostic terms ! ============================================================================ diff --git a/src/utils/clmfates_interfaceMod.F90 b/src/utils/clmfates_interfaceMod.F90 index d778aa1260..1ed29195e9 100644 --- a/src/utils/clmfates_interfaceMod.F90 +++ b/src/utils/clmfates_interfaceMod.F90 @@ -909,7 +909,7 @@ subroutine dynamics_driv(this, nc, bounds_clump, & ! --------------------------------------------------------------------------------- ! Part III.2 (continued). - ! Update UpdateLdiagnostics of the FATES ecosystem structure that are used in the HLM. + ! Update diagnostics of the FATES ecosystem structure that are used in the HLM. ! --------------------------------------------------------------------------------- call this%wrap_update_hlmfates_dyn(nc, & bounds_clump, &