From ec090f4dfbade5d4db42ca3999c9d09898a7a1f5 Mon Sep 17 00:00:00 2001 From: David Minton Date: Wed, 29 Nov 2023 13:43:39 -0500 Subject: [PATCH] Fixed issue that was causing RMVS to segfault when the number of massive bodies are 0. It defaults back to WHM in that case --- src/rmvs/rmvs_step.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/rmvs/rmvs_step.f90 b/src/rmvs/rmvs_step.f90 index 098622037..bf8f9cb88 100644 --- a/src/rmvs/rmvs_step.f90 +++ b/src/rmvs/rmvs_step.f90 @@ -28,7 +28,7 @@ module subroutine rmvs_step_system(self, param, t, dt) logical :: lencounter, lfirstpl real(DP), dimension(:,:), allocatable :: rbeg, rend, vbeg - if (self%tp%nbody == 0) then + if ((self%tp%nbody == 0) .or. (self%pl%nbody == 0)) then call whm_step_system(self, param, t, dt) else select type(cb => self%cb)