ScaLAPACK 2.1
2.1
ScaLAPACK: Scalable Linear Algebra PACKage
BI_GetMpiGeType.c
Go to the documentation of this file.
1
#include "
Bdef.h
"
2
MPI_Datatype
BI_GetMpiGeType
(
BLACSCONTEXT
*ctxt,
int
m,
int
n,
int
lda,
3
MPI_Datatype Dtype,
int
*N)
4
{
5
int
info;
6
MPI_Datatype GeType;
7
8
/*
9
* Some versions of mpich and its derivitives cannot handle 0 byte typedefs,
10
* so we set type MPI_BYTE as a flag for a 0 byte message
11
*/
12
#ifdef ZeroByteTypeBug
13
if
( (m < 1) || (n < 1) )
14
{
15
*N = 0;
16
return
(MPI_BYTE);
17
}
18
#endif
19
*N = 1;
20
info=MPI_Type_vector(n, m, lda, Dtype, &GeType);
21
info=MPI_Type_commit(&GeType);
22
23
return
(GeType);
24
}
bLaCsCoNtExT
Definition:
Bdef.h:23
Bdef.h
BI_GetMpiGeType
MPI_Datatype BI_GetMpiGeType(BLACSCONTEXT *ctxt, int m, int n, int lda, MPI_Datatype Dtype, int *N)
Definition:
BI_GetMpiGeType.c:2
BLACS
SRC
BI_GetMpiGeType.c
Generated by
1.8.16