SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ BI_HypBS()

Int BI_HypBS ( BLACSCONTEXT ctxt,
BLACBUFF bp,
SDRVPTR  send 
)

Definition at line 2 of file BI_HypBS.c.

3{
4 Int bit, Np, Iam, msgid;
5
6 Np = ctxt->scp->Np;
7 if (Np < 2) return(NORV);
8 Iam = ctxt->scp->Iam;
9 msgid = Mscopeid(ctxt);
10
11 for (bit=2; bit < Np; bit <<= 1);
12 if (bit^Np) return(NPOW2); /* not a power of 2 */
13
14 for(bit=1; (bit^Np); bit <<= 1)
15 send(ctxt, (Iam^bit), msgid, bp);
16
17 return(0); /* error-free return */
18}
#define Int
Definition Bconfig.h:22
#define NORV
Definition Bdef.h:87
#define Mscopeid(ctxt)
Definition Bdef.h:179
#define NPOW2
Definition Bdef.h:88
BLACSSCOPE * scp
Definition Bdef.h:26
Int Np
Definition Bdef.h:17
Int Iam
Definition Bdef.h:17
Here is the caller graph for this function: