Update biogeochem/EDLoggingMortalityMod.F90

Co-authored-by: Gregory Lemieux <[email protected]>
rgknox · Mar 14, 2022 · c07fbdb · c07fbdb
1 parent b83eeff
commit c07fbdb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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