00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032 #ifndef TEUCHOS_RAW_MPI_TRAITS_H
00033 #define TEUCHOS_RAW_MPI_TRAITS_H
00034
00035 #include "Teuchos_ConfigDefs.hpp"
00036
00041 namespace Teuchos {
00042
00044
00054 template <class T> class RawMPITraits {
00055 public:
00057 static MPI_Datatype type() { bool *junk1; T *junk2 = &junk1; return MPI_DATATYPE_NULL; }
00058 };
00059
00060 #ifndef DOXYGEN_SHOULD_SKIP_THIS
00061
00062
00064 template <> class RawMPITraits<char> {
00065 public:
00067 static MPI_Datatype type() { return MPI_CHAR; }
00068 };
00069
00071
00073 template <> class RawMPITraits<int> {
00074 public:
00076 static MPI_Datatype type() { return MPI_INT; }
00077 };
00078
00080
00082 template <> class RawMPITraits<float> {
00083 public:
00085 static MPI_Datatype type() { return MPI_FLOAT; }
00086 };
00087
00089
00091 template <> class RawMPITraits<double> {
00092 public:
00094 static MPI_Datatype type() { return MPI_DOUBLE; }
00095 };
00096
00098
00100 template <class T> class RawMPITraits<std::complex<T> > {
00101 public:
00103 static MPI_Datatype type() { buildType(); return type_; }
00104 private:
00105 static void buildType() {
00106 if(type_==MPI_DATATYPE_NULL)
00107 MPI_Type_contiguous( 2, RawMPITraits<T>::type(), &type_ );
00108 }
00109 static MPI_Datatype type_;
00110 };
00111
00112 template <class T> MPI_Datatype RawMPITraits<std::complex<T> >::type_ = MPI_DATATYPE_NULL;
00113
00114 #endif // DOXYGEN_SHOULD_SKIP_THIS
00115
00116 }
00117
00118 #endif // TEUCHOS_RAW_MPI_TRAITS_H