! $Id$ ! ! This module contains subroutines useful for the Particle module. ! module Particles_sub ! implicit none ! endmodule Particles_sub