diff --git a/src/fraggle/fraggle_generate.f90 b/src/fraggle/fraggle_generate.f90 index eb69eb7dd..81883f054 100644 --- a/src/fraggle/fraggle_generate.f90 +++ b/src/fraggle/fraggle_generate.f90 @@ -483,7 +483,7 @@ module subroutine fraggle_generate_vel_vec(collider, nbody_system, param, lfailu real(DP) :: delta_v, GC integer(I4B), parameter :: MAXINNER = 10 integer(I4B), parameter :: MAXOUTER = 10 - integer(I4B), parameter :: MAXANGMTM = 100 + integer(I4B), parameter :: MAXANGMTM = 10000 class(collision_fraggle), allocatable :: collider_local character(len=STRMAX) :: message