Adding some parentheses to simulate potential OOO changes from upcomi…

…ng change.
ESCOMP · Aug 11, 2023 · 728b7e6 · 728b7e6
1 parent 7d2979c
commit 728b7e6
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/soilbiogeochem/SoilBiogeochemNitrifDenitrifMod.F90 b/src/soilbiogeochem/SoilBiogeochemNitrifDenitrifMod.F90
@@ -283,8 +283,8 @@ subroutine SoilBiogeochemNitrifDenitrif(bounds, num_soilc, filter_soilc, &
                ! First, get diffusivity as a unitless constant, which is what's needed to
                ! calculate ratio_k1 below.
                diffus (c,j) = &
-                    (om_frac * eps**(10._r8/3._r8) / watsat(c,j)**2 + &
-                    (1._r8-om_frac) * eps**2 * f_a**(3._r8 / bsw(c,j)) ) 
+                    (om_frac * (eps**(10._r8/3._r8) / watsat(c,j)**2) + &
+                    (1._r8-om_frac) * (eps**2 * f_a**(3._r8 / bsw(c,j))) ) 
 
                ! calculate anoxic fraction of soils
                ! use rijtema and kroess model after Riley et al., 2000