|
integer,
|
public |
|
:: |
n_halo |
= |
4 |
DistD2 implementation is hardcoded for 4 halo layers for all backends
|
|
type(mesh_t),
|
public, |
pointer
|
:: |
mesh |
|
|
|
|
class(allocator_t),
|
public, |
pointer
|
:: |
allocator |
|
|
|
|
class(poisson_fft_t),
|
public, |
pointer
|
:: |
poisson_fft |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
u_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
u_recv_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
u_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
u_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
v_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
v_recv_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
v_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
v_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
w_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
w_recv_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
w_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
w_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
du_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
du_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
du_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
du_recv_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
dud_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
dud_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
dud_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
dud_recv_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
d2u_send_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
d2u_send_e |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
d2u_recv_s |
|
|
|
|
real(kind=dp),
|
public, |
allocatable, dimension(:, :, :)
|
:: |
d2u_recv_e |
|
|
|