3 #ifndef DUNE_MPITRAITS_HH 4 #define DUNE_MPITRAITS_HH 40 MPITraits(
const MPITraits&){}
41 static MPI_Datatype datatype;
42 static MPI_Datatype vectortype;
46 if(datatype==MPI_DATATYPE_NULL) {
47 MPI_Type_contiguous(
sizeof(T),MPI_BYTE,&datatype);
48 MPI_Type_commit(&datatype);
61 #define ComposeMPITraits(p,m) \ 63 struct MPITraits<p>{ \ 64 static inline MPI_Datatype getType(){ \ 69 ComposeMPITraits(
char, MPI_CHAR);
70 ComposeMPITraits(
unsigned char,MPI_UNSIGNED_CHAR);
71 ComposeMPITraits(
short,MPI_SHORT);
72 ComposeMPITraits(
unsigned short,MPI_UNSIGNED_SHORT);
73 ComposeMPITraits(
int,MPI_INT);
74 ComposeMPITraits(
unsigned int,MPI_UNSIGNED);
75 ComposeMPITraits(
long,MPI_LONG);
76 ComposeMPITraits(
unsigned long,MPI_UNSIGNED_LONG);
77 ComposeMPITraits(
float,MPI_FLOAT);
78 ComposeMPITraits(
double,MPI_DOUBLE);
79 ComposeMPITraits(
long double,MPI_LONG_DOUBLE);
82 #undef ComposeMPITraits 86 template<
class K,
int n>
89 static MPI_Datatype datatype;
90 static MPI_Datatype vectortype;
92 static inline MPI_Datatype
getType()
94 if(datatype==MPI_DATATYPE_NULL) {
96 MPI_Type_commit(&vectortype);
100 MPI_Get_address(&fvector, &base);
101 MPI_Get_address(&(fvector[0]), &displ);
105 MPI_Type_create_struct(1, length, &displ, &vectortype, &datatype);
106 MPI_Type_commit(&datatype);
113 template<
class K,
int n>
115 template<
class K,
int n>
125 static MPI_Datatype datatype;
126 static MPI_Datatype vectortype;
128 static inline MPI_Datatype
getType()
130 if(datatype==MPI_DATATYPE_NULL) {
137 MPI_Get_address(&data, &base);
138 MPI_Get_address(&(data.digit), &displ);
141 MPI_Type_create_struct(1, length, &displ, &vectortype, &datatype);
142 MPI_Type_commit(&datatype);
156 template<
typename T1,
typename T2>
160 inline static MPI_Datatype
getType();
162 static MPI_Datatype type;
164 template<
typename T1,
typename T2>
167 if(type==MPI_DATATYPE_NULL) {
172 std::pair<T1,T2> rep[2];
173 length[0]=length[1]=length[2]=length[3]=1;
174 MPI_Get_address(rep, disp);
175 MPI_Get_address(&(rep[0].first), disp+1);
176 MPI_Get_address(&(rep[0].second), disp+2);
177 MPI_Get_address(rep+1, disp+3);
178 for(
int i=3; i >= 0; --i)
180 MPI_Type_create_struct(4, length, disp, types, &type);
181 MPI_Type_commit(&type);
186 template<
typename T1,
typename T2>
vector space out of a tensor product of fields.
Definition: densematrix.hh:36
static MPI_Datatype getType()
Definition: mpitraits.hh:44
Portable very large unsigned integers.
Definition: bigunsignedint.hh:70
A traits class describing the mapping of types onto MPI_Datatypes.
Definition: bigunsignedint.hh:30
Dune namespace.
Definition: alignment.hh:9