From 5b5d8e8891c2a663343a44e6bbce0b7d1e921f4d Mon Sep 17 00:00:00 2001
From: David A Minton <daminton@purdue.edu>
Date: Wed, 28 Jul 2021 10:27:51 -0400
Subject: [PATCH] Cleaned up a few comments

---
 src/modules/symba_classes.f90 |  8 ++++----
 src/symba/symba_util.f90      | 10 +++++-----
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/src/modules/symba_classes.f90 b/src/modules/symba_classes.f90
index fc3520079..7eab9e5c7 100644
--- a/src/modules/symba_classes.f90
+++ b/src/modules/symba_classes.f90
@@ -390,27 +390,27 @@ end subroutine symba_util_resize_pltpenc
 
       module subroutine symba_util_sort_pl(self, sortby, ascending)
          implicit none
-         class(symba_pl), intent(inout) :: self      !! Symba massive body object
+         class(symba_pl), intent(inout) :: self      !! SyMBA massive body object
          character(*),    intent(in)    :: sortby    !! Sorting attribute
          logical,         intent(in)    :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order
       end subroutine symba_util_sort_pl 
 
       module subroutine symba_util_sort_tp(self, sortby, ascending)
          implicit none
-         class(symba_tp), intent(inout) :: self      !! Swiftest test particle object
+         class(symba_tp), intent(inout) :: self      !! SyMBA test particle object
          character(*),    intent(in)    :: sortby    !! Sorting attribute
          logical,         intent(in)    :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order
       end subroutine symba_util_sort_tp
 
       module subroutine symba_util_sort_rearrange_pl(self, ind)
          implicit none
-         class(symba_pl),               intent(inout) :: self !! Symba massive body object
+         class(symba_pl),               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_pl
 
       module subroutine symba_util_sort_rearrange_tp(self, ind)
          implicit none
-         class(symba_tp),               intent(inout) :: self !! Symba massive body object
+         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
         
diff --git a/src/symba/symba_util.f90 b/src/symba/symba_util.f90
index a89da7b6a..be47c9b96 100644
--- a/src/symba/symba_util.f90
+++ b/src/symba/symba_util.f90
@@ -68,11 +68,11 @@ end subroutine symba_util_resize_pltpenc
    module subroutine symba_util_sort_pl(self, sortby, ascending)
       !! author: David A. Minton
       !!
-      !! Sort a Swiftest test particle object  in-place. 
+      !! Sort a SyMBA massive body object in-place. 
       !! sortby is a string indicating which array component to sort.
       implicit none
       ! Arguments
-      class(symba_pl), intent(inout) :: self      !! Symba massive body object
+      class(symba_pl), intent(inout) :: self      !! SyMBA massive body object
       character(*),    intent(in)    :: sortby    !! Sorting attribute
       logical,         intent(in)    :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order
       ! Internals
@@ -128,11 +128,11 @@ end subroutine symba_util_sort_pl
    module subroutine symba_util_sort_tp(self, sortby, ascending)
       !! author: David A. Minton
       !!
-      !! Sort a Swiftest test particle object  in-place. 
+      !! Sort a SyMBA test particle object in-place. 
       !! sortby is a string indicating which array component to sort.
       implicit none
       ! Arguments
-      class(symba_tp), intent(inout) :: self      !! Swiftest test particle object
+      class(symba_tp), intent(inout) :: self      !! SyMBA test particle object
       character(*),    intent(in)    :: sortby    !! Sorting attribute
       logical,         intent(in)    :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order
       ! Internals
@@ -207,7 +207,7 @@ end subroutine symba_util_sort_rearrange_pl
    module subroutine symba_util_sort_rearrange_tp(self, ind)
       !! author: David A. Minton
       !!
-      !! Rearrange SyMBA test particle object  in-place from an index list.
+      !! Rearrange SyMBA test particle object in-place from an index list.
       !! This is a helper utility used to make polymorphic sorting work on Swiftest structures.
       implicit none
       ! Arguments