Skip to content

Commit

Permalink
Relax tolerance for truncating small snocan values in CanopyFluxes
Browse files Browse the repository at this point in the history
The default of 1e-13 was letting through some state updates that look
like they should have been truncated to 0: each time step, snocan was
decreasing by about 12 orders of magnitude.

Addresses #2444
  • Loading branch information
billsacks committed Apr 5, 2024
1 parent 6622b68 commit fef58b6
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/biogeophys/CanopyFluxesMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1624,7 +1624,8 @@ subroutine CanopyFluxes(bounds, num_exposedvegp, filter_exposedvegp,
! snocan < rel_epsilon * snocan_baseline will be set to zero
! See NumericsMod for rel_epsilon value
call truncate_small_values(fn, filterp, begp, endp, &
snocan_baseline(begp:endp), snocan(begp:endp))
snocan_baseline(begp:endp), snocan(begp:endp), &
custom_rel_epsilon=1.e-10_r8)

if ( use_fates ) then

Expand Down

0 comments on commit fef58b6

Please sign in to comment.