diff --git a/src/modules/helio_classes.f90 b/src/modules/helio_classes.f90 index d03466676..22c39961c 100644 --- a/src/modules/helio_classes.f90 +++ b/src/modules/helio_classes.f90 @@ -208,4 +208,5 @@ module subroutine helio_step_tp(self, system, param, t, dt) real(DP), intent(in) :: dt !! Stepsizee end subroutine helio_step_tp end interface + end module helio_classes diff --git a/src/modules/swiftest.f90 b/src/modules/swiftest.f90 index 10578c5b6..58074a2fe 100644 --- a/src/modules/swiftest.f90 +++ b/src/modules/swiftest.f90 @@ -16,5 +16,4 @@ module swiftest implicit none public - end module swiftest diff --git a/src/modules/symba_classes.f90 b/src/modules/symba_classes.f90 index 01fb7bbf4..4bd154126 100644 --- a/src/modules/symba_classes.f90 +++ b/src/modules/symba_classes.f90 @@ -413,7 +413,7 @@ module subroutine symba_util_sort_rearrange_tp(self, ind) class(symba_tp), intent(inout) :: self !! SyMBA massive body object integer(I4B), dimension(:), intent(in) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine symba_util_sort_rearrange_tp - end interface + end module symba_classes \ No newline at end of file