Mirror the particle with z>0 with respect to the xy plane, to impose the equatorial-plane symmetry
FT 1.09.2021
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | npart | |||
double precision, | intent(inout), | DIMENSION(3,npart) | :: | pos | ||
double precision, | intent(inout), | optional, | DIMENSION(npart) | :: | nu | |
double precision, | intent(in), | optional | :: | com_star | ||
logical, | intent(in), | optional | :: | verbose |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private | :: | a | ||||
integer, | private, | DIMENSION(:), ALLOCATABLE | :: | above_xy_plane_a | |||
double precision, | private | :: | com_d | ||||
double precision, | private | :: | com_x | ||||
double precision, | private | :: | com_y | ||||
double precision, | private | :: | com_z | ||||
integer, | private | :: | npart_above_xy | ||||
double precision, | private, | DIMENSION(:), ALLOCATABLE | :: | nu_below | |||
double precision, | private, | DIMENSION(:,:), ALLOCATABLE | :: | pos_below |