forked from etmc/tmLQCD
-
Notifications
You must be signed in to change notification settings - Fork 1
/
mpi_init.h
79 lines (62 loc) · 2.25 KB
/
mpi_init.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
/* $Id$ */
#ifndef _MPI_INIT_H
#define _MPI_INIT_H
#ifdef MPI
#include <mpi.h>
/* Datatypes for the data exchange */
extern MPI_Datatype gauge_time_slice_cont;
extern MPI_Datatype gauge_time_slice_split;
extern MPI_Datatype deri_time_slice_cont;
extern MPI_Datatype deri_time_slice_split;
extern MPI_Datatype field_time_slice_cont;
extern MPI_Datatype gauge_x_slice_cont;
extern MPI_Datatype gauge_x_slice_gath;
extern MPI_Datatype gauge_x_slice_gath_split;
extern MPI_Datatype field_x_slice_cont;
extern MPI_Datatype field_x_slice_gath;
extern MPI_Datatype deri_x_slice_cont;
extern MPI_Datatype deri_x_slice_gath;
extern MPI_Datatype deri_x_slice_gath_split;
extern MPI_Datatype gauge_xt_edge_cont;
extern MPI_Datatype gauge_xt_edge_gath;
extern MPI_Datatype gauge_xt_edge_gath_split;
extern MPI_Datatype gauge_yx_edge_cont;
extern MPI_Datatype gauge_yx_edge_gath;
extern MPI_Datatype gauge_yx_edge_gath_split;
extern MPI_Datatype gauge_ty_edge_cont;
extern MPI_Datatype gauge_ty_edge_gath;
extern MPI_Datatype gauge_ty_edge_gath_split;
extern MPI_Datatype gauge_zx_edge_cont;
extern MPI_Datatype gauge_zx_edge_gath;
extern MPI_Datatype gauge_zx_edge_gath_split;
extern MPI_Datatype gauge_tz_edge_cont;
extern MPI_Datatype gauge_tz_edge_gath;
extern MPI_Datatype gauge_tz_edge_gath_split;
extern MPI_Datatype gauge_zy_edge_cont;
extern MPI_Datatype gauge_zy_edge_gath;
extern MPI_Datatype gauge_zy_edge_gath_split;
extern MPI_Datatype gauge_y_slice_cont;
extern MPI_Datatype gauge_y_slice_gath;
extern MPI_Datatype gauge_y_slice_gath_split;
extern MPI_Datatype field_y_slice_cont;
extern MPI_Datatype field_y_slice_gath;
extern MPI_Datatype deri_y_slice_cont;
extern MPI_Datatype deri_y_slice_gath;
extern MPI_Datatype deri_y_slice_gath_split;
extern MPI_Datatype deri_z_slice_cont;
extern MPI_Datatype deri_z_slice_gath;
extern MPI_Datatype deri_z_slice_gath_split;
extern MPI_Datatype gauge_z_slice_gath;
extern MPI_Datatype gauge_z_slice_cont;
extern MPI_Datatype gauge_z_slice_gath_split;
extern MPI_Datatype field_z_slice_cont;
extern MPI_Datatype field_z_slice_half;
#ifdef PARALLELXYZT
extern spinor * field_buffer_z ALIGN;
extern spinor * field_buffer_z2 ALIGN;
#endif
extern MPI_Comm mpi_time_slices;
#endif
extern int mpi_time_rank;
void mpi_init(int argc, char *argv[]);
#endif