Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Browse files Browse the repository at this point in the history
Removed cruft
  • Loading branch information
daminton committed Apr 3, 2021
1 parent f37d647 commit f1da3e5
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions src/modules/rmvs_classes.f90
Original file line number Diff line number Diff line change
Expand Up @@ -39,7 +39,6 @@ module rmvs_classes
logical, dimension(:), allocatable :: lperi !! planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step)
integer(I4B), dimension(:), allocatable :: plperP !! index of planet associated with pericenter distance peri (persistent over a full RMVS time step)
integer(I4B), dimension(:), allocatable :: plencP !! index of planet that test particle is encountering (not persistent for a full RMVS time step)
integer(I4B), dimension(:), allocatable :: tpencP !! index of next test particle encountering planet
real(DP), dimension(:,:), allocatable :: vbeg !! Planet velocities at beginning ot step

! The following are used to correctly set the oblateness values of the acceleration during an inner encounter with a planet
Expand Down Expand Up @@ -74,10 +73,9 @@ module rmvs_classes
real(DP), dimension(:, :, :), allocatable :: xin !! interpolated heliocentric planet position for inner encounter
real(DP), dimension(:, :, :), allocatable :: vin !! interpolated heliocentric planet velocity for inner encounter
type(rmvs_tp), dimension(:), allocatable :: tpenc !! array of encountering test particles with this planet in planetocentric coordinates
type(whm_pl) , dimension(:), allocatable :: plenc !! array of massive bodies that includes the Sun, but not the encountering planet in planetocentric coordinates
type(whm_pl) , dimension(:), allocatable :: plenc !! array of massive bodies that includes the Sun, but not the encountering planet in planetocentric coordinates
type(rmvs_cb), dimension(:), allocatable :: cbenc !! The planet acting as a central body for close encounters
real(DP), dimension(:, :, :), allocatable :: aoblin !! barycentric acceleration on planets due to central body oblateness during inner encounter
logical, dimension(:, :), allocatable :: encmask !! logical mask indicating which test particles are encountering a particular planet
integer(I4B), dimension(:,:), allocatable :: plind
!! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the
!! component list, such as rmvs_setup_pl and rmvs_spill_pl
Expand Down

0 comments on commit f1da3e5

Please sign in to comment.