/[escript]/branches/arrexp_2137_win/paso/src/Paso_MPI.h
ViewVC logotype

Annotation of /branches/arrexp_2137_win/paso/src/Paso_MPI.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 969 - (hide annotations)
Tue Feb 13 23:02:23 2007 UTC (12 years, 4 months ago) by ksteube
Original Path: trunk/paso/src/Paso_MPI.h
File MIME type: text/plain
File size: 813 byte(s)
Parallelization using MPI for solution of implicit problems.

Parallelization for explicit problems has already been accomplished in
the main SVN branch.

This is incomplete and is not ready for use.


1 bcumming 731 #ifndef INC_MPI
2     #define INC_MPI
3    
4     #include "Common.h"
5    
6 bcumming 790 #ifdef PASO_MPI
7     #include "mpi_C.h"
8 ksteube 969 #endif
9 bcumming 790
10 bcumming 731 #define PASO_MPI_TODO { fprintf( stdout, "\nTODO : %s:%d\n", __FILE__, __LINE__); MPI_Finalize(); exit(1); }
11 bcumming 751 #define PASO_INFO_ERRORMSG( err, msg ) { char _msg__[256]; sprintf( _msg__, "%s : %s:%d\n", msg, __FILE__, __LINE__ ); Paso_setError( err, _msg__ ); }
12 bcumming 731
13     /* Datatypes */
14     struct Paso_MPIInfo{
15     dim_t reference_counter;
16     int size;
17     int rank;
18 ksteube 969 #ifdef PASO_MPI
19 bcumming 731 MPI_Comm comm;
20 ksteube 969 #endif
21 bcumming 731 };
22    
23     typedef struct Paso_MPIInfo Paso_MPIInfo;
24    
25     /* Function prototypes */
26 ksteube 969 #ifdef PASO_MPI
27 bcumming 731 Paso_MPIInfo* Paso_MPIInfo_alloc( MPI_Comm comm );
28 ksteube 969 #endif
29 bcumming 731 void Paso_MPIInfo_dealloc( Paso_MPIInfo* );
30     Paso_MPIInfo *Paso_MPIInfo_getReference( Paso_MPIInfo* in );
31     int Paso_MPI_initialized( void );
32    
33 bcumming 790 #endif // PASO_MPI

  ViewVC Help
Powered by ViewVC 1.1.26