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