find_particles_above_xy_plane Interface

interface


Calls

interface~~find_particles_above_xy_plane~~CallsGraph interface~find_particles_above_xy_plane find_particles_above_xy_plane proc~find_particles_above_xy_plane find_particles_above_xy_plane interface~find_particles_above_xy_plane->proc~find_particles_above_xy_plane

Called by

interface~~find_particles_above_xy_plane~~CalledByGraph interface~find_particles_above_xy_plane find_particles_above_xy_plane proc~impose_equatorial_plane_symmetry impose_equatorial_plane_symmetry proc~impose_equatorial_plane_symmetry->interface~find_particles_above_xy_plane interface~impose_equatorial_plane_symmetry impose_equatorial_plane_symmetry interface~impose_equatorial_plane_symmetry->proc~impose_equatorial_plane_symmetry none~read_particles_from_formatted_file read_particles_from_formatted_file none~read_particles_from_formatted_file->interface~impose_equatorial_plane_symmetry proc~perform_apm perform_apm proc~perform_apm->interface~impose_equatorial_plane_symmetry interface~perform_apm perform_apm interface~perform_apm->proc~perform_apm proc~construct_particles_std construct_particles_std proc~construct_particles_std->none~read_particles_from_formatted_file proc~construct_particles_std->interface~perform_apm interface~construct_particles_std construct_particles_std interface~construct_particles_std->proc~construct_particles_std interface~particles particles interface~particles->interface~construct_particles_std program~convergence_test convergence_test program~convergence_test->interface~particles program~sphincs_id sphincs_id program~sphincs_id->interface~particles

public module subroutine find_particles_above_xy_plane(npart, pos, npart_above_xy, above_xy_plane_a)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: npart
double precision, intent(in), DIMENSION(3,npart) :: pos
integer, intent(out) :: npart_above_xy
integer, intent(out), DIMENSION(:), ALLOCATABLE :: above_xy_plane_a

Description

Mirror the particle with z>0 with respect to the xy plane, to impose the equatorial-plane symmetry