-- Checks whether a particle could ever get closer to the origin than it is now.
quiescent :: Particle -> Bool
quiescent particle = and qDimensions
-- Checks whether a particle could ever get closer to the origin than it is now.
quiescent :: Particle -> Bool
quiescent particle = and qDimensions