From be19703380b391264127ee23a901811175ff4c77 Mon Sep 17 00:00:00 2001
From: David Minton <daminton@purdue.edu>
Date: Thu, 20 May 2021 12:19:50 -0400
Subject: [PATCH] Reduced tolerance value for greater likelihood of convergence

---
 src/symba/symba_frag_pos.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/symba/symba_frag_pos.f90 b/src/symba/symba_frag_pos.f90
index 4186e9781..f9d034542 100644
--- a/src/symba/symba_frag_pos.f90
+++ b/src/symba/symba_frag_pos.f90
@@ -644,7 +644,7 @@ subroutine set_fragment_radial_velocities(lmerge)
       ! Arguments
       logical,                intent(out)   :: lmerge
       ! Internals
-      real(DP), parameter                   :: TOL = 1e-10_DP
+      real(DP), parameter                   :: TOL = 1e-8_DP
       real(DP), dimension(:), allocatable   :: vflat 
       logical                               :: lerr
       integer(I4B)                          :: i