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

◆ BI_TreeBS()

void BI_TreeBS ( BLACSCONTEXT ctxt,
BLACBUFF bp,
SDRVPTR  send,
Int  nbranches 
)

Definition at line 37 of file BI_TreeBS.c.

38{
39 Int Np, Iam, msgid, i, j;
40 Int destdist; /* the distance of the destination node */
41
42 Np = ctxt->scp->Np;
43 if (Np < 2) return;
44 Iam = ctxt->scp->Iam;
45 msgid = Mscopeid(ctxt);
46
47 for (i=nbranches; i < Np; i*=nbranches);
48 for (i /= nbranches; i > 0; i /= nbranches)
49 {
50 j = 1;
51 do
52 {
53 destdist = i*j;
54 if (destdist < Np)
55 send(ctxt, (destdist+Iam)%Np, msgid, bp);
56 }
57 while(++j < nbranches);
58 }
59} /* end BI_TreeBS */
#define Int
Definition Bconfig.h:22
#define Mscopeid(ctxt)
Definition Bdef.h:179
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: