Skip to content

Commit 632faeb

Browse files
committed
Use same balance_check_tolerance for C and P
1 parent f46455b commit 632faeb

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

components/elm/src/biogeochem/EcosystemBalanceCheckMod.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -281,7 +281,7 @@ subroutine ColCBalanceCheck(bounds, &
281281
end if
282282

283283
! check for significant errors
284-
if (abs(col_errcb(c)) > 1e-8_r8) then
284+
if (abs(col_errcb(c)) > balance_check_tolerance) then
285285
err_found = .true.
286286
err_index = c
287287
end if
@@ -734,7 +734,7 @@ subroutine ColPBalanceCheck(bounds, &
734734
col_errpb(c) = (col_pinputs(c) - col_poutputs(c))*dt - &
735735
(col_endpb(c) - col_begpb(c))
736736

737-
if (abs(col_errpb(c)) > 1e-8_r8) then
737+
if (abs(col_errpb(c)) > balance_check_tolerance) then
738738
err_found = .true.
739739
err_index = c
740740
end if

0 commit comments

Comments
 (0)