|
ScaLAPACK
2.0.2
ScaLAPACK: Scalable Linear Algebra PACKage
|
#include "Bdef.h"Go to the source code of this file.
Functions/Subroutines | |
| MPI_Datatype | BI_GetMpiGeType (BLACSCONTEXT *ctxt, int m, int n, int lda, MPI_Datatype Dtype, int *N) |
| MPI_Datatype BI_GetMpiGeType | ( | BLACSCONTEXT * | ctxt, |
| int | m, | ||
| int | n, | ||
| int | lda, | ||
| MPI_Datatype | Dtype, | ||
| int * | N | ||
| ) |
Definition at line 2 of file BI_GetMpiGeType.c.
{
int info;
MPI_Datatype GeType;
/*
* Some versions of mpich and its derivitives cannot handle 0 byte typedefs,
* so we set type MPI_BYTE as a flag for a 0 byte message
*/
#ifdef ZeroByteTypeBug
if ( (m < 1) || (n < 1) )
{
*N = 0;
return (MPI_BYTE);
}
#endif
*N = 1;
info=MPI_Type_vector(n, m, lda, Dtype, &GeType);
info=MPI_Type_commit(&GeType);
return(GeType);
}