- return ((MPITag%MODULO_TAG) == _message_time) ;
- }
-
- // Returns the MPI size of a TimeMessage
- inline MPI_Aint MPIAccess::timeExtent() const
- {
- MPI_Aint extent ;
- MPI_Type_extent( _MPI_TIME , &extent ) ;
- return extent ;
- }
-
- // Returns the MPI size of a MPI_INT
- inline MPI_Aint MPIAccess::intExtent() const
- {
- MPI_Aint extent ;
- MPI_Type_extent( MPI_INT , &extent ) ;
- return extent ;
- }
-
- // Returns the MPI size of a MPI_DOUBLE
- inline MPI_Aint MPIAccess::doubleExtent() const
- {
- MPI_Aint extent ;
- MPI_Type_extent( MPI_DOUBLE , &extent ) ;
- return extent ;