diff --git a/biogeochem/EDLoggingMortalityMod.F90 b/biogeochem/EDLoggingMortalityMod.F90 index 2a451358d7..c1ac6694c8 100644 --- a/biogeochem/EDLoggingMortalityMod.F90 +++ b/biogeochem/EDLoggingMortalityMod.F90 @@ -862,7 +862,7 @@ subroutine UpdateHarvestC(currentSite,bc_out) unit_trans_factor = 1000._r8 * days_per_sec / 31._r8 else if((hlm_current_month == 4) .or. (hlm_current_month == 6) .or. & (hlm_current_month == 9) .or. (hlm_current_month == 11)) then - unit_trans_factor = 1000._r8 * days_per_sec / 30._r8 + unit_trans_factor = g_per_kg * days_per_sec / 30._r8 else unit_trans_factor = 1000._r8 * days_per_sec / 28._r8 end if