From c2db7c08ce8a7ce0aeceae65a322b28d0a1ae7db Mon Sep 17 00:00:00 2001 From: David A Minton Date: Fri, 20 Aug 2021 09:55:57 -0400 Subject: [PATCH] Added missing use statements --- src/modules/helio_classes.f90 | 1 + src/modules/symba_classes.f90 | 1 + 2 files changed, 2 insertions(+) diff --git a/src/modules/helio_classes.f90 b/src/modules/helio_classes.f90 index 156f0ea50..dcfcdde2e 100644 --- a/src/modules/helio_classes.f90 +++ b/src/modules/helio_classes.f90 @@ -215,6 +215,7 @@ module subroutine helio_step_tp(self, system, param, t, dt) end subroutine helio_step_tp module subroutine helio_util_index_eucl_plpl(self, param) + use swiftest_classes, only : swiftest_parameters implicit none class(helio_pl), intent(inout) :: self !! Helio massive body object class(swiftest_parameters), intent(in) :: param !! Current run configuration parameters diff --git a/src/modules/symba_classes.f90 b/src/modules/symba_classes.f90 index cf809453b..7a2599a46 100644 --- a/src/modules/symba_classes.f90 +++ b/src/modules/symba_classes.f90 @@ -354,6 +354,7 @@ module function symba_collision_casesupercatastrophic(system, param, family, x, end function symba_collision_casesupercatastrophic module subroutine symba_util_index_eucl_plpl(self, param) + use swiftest_classes, only : swiftest_parameters implicit none class(symba_pl), intent(inout) :: self !! SyMBA massive body object class(swiftest_parameters), intent(in) :: param !! Current run configuration parameters