We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 95f8481 commit e25e220Copy full SHA for e25e220
BLACS/SRC/Bdef.h
@@ -129,6 +129,15 @@ typedef void (*SDRVPTR)(BLACSCONTEXT *, Int, Int, BLACBUFF *);
129
void BI_BlacsWarn(Int ConTxt, Int line, char *file, char *form, ...);
130
void BI_BlacsErr(Int ConTxt, Int line, char *file, char *form, ...);
131
Int BI_ContxtNum(BLACSCONTEXT *ctxt);
132
+void BI_TransDist(BLACSCONTEXT *ctxt, char scope, Int m, Int n, Int *rA,
133
+ Int *cA, Int ldrc, BI_DistType *dist, Int rdest, Int cdest);
134
+void BI_dmvcopy(Int m, Int n, double *A, Int lda, double *buff);
135
+void BI_dvmcopy(Int m, Int n, double *A, Int lda, double *buff);
136
+void BI_imvcopy(Int m, Int n, Int *A, Int lda, Int *buff);
137
+void BI_ivmcopy(Int m, Int n, Int *A, Int lda, Int *buff);
138
+void BI_smvcopy(Int m, Int n, float *A, Int lda, float *buff);
139
+void BI_svmcopy(Int m, Int n, float *A, Int lda, float *buff);
140
+void Cblacs_pinfo(Int *mypnum, Int *nprocs);
141
142
/*
143
* If we've got an ANSI standard C compiler, we can use void pointers...
BLACS/SRC/blacs_init_.c
@@ -6,7 +6,12 @@ void Cblacs_gridinit(Int *ConTxt, char *order, Int nprow, Int npcol)
6
F_VOID_FUNC blacs_gridinit_(Int *ConTxt, F_CHAR order, Int *nprow, Int *npcol)
7
#endif
8
{
9
+#if (INTFACE == C_CALL)
10
void Cblacs_gridmap(Int *, Int *, Int, Int, Int);
11
+#else
12
+ F_VOID_FUNC blacs_gridmap_(Int *ConTxt, Int *usermap, Int *ldup, Int *nprow0,
13
+ Int *npcol0);
14
+#endif
15
Int *tmpgrid, *iptr;
16
Int i, j;
17
0 commit comments