ScaLAPACK 2.1  2.1
ScaLAPACK: Scalable Linear Algebra PACKage
BI_IdringBS.c
Go to the documentation of this file.
1 #include "Bdef.h"
2 
3 void BI_IdringBS(BLACSCONTEXT *ctxt, BLACBUFF *bp, SDRVPTR send, int step)
4 {
5  int Np, Iam, msgid;
6 
7  Np = ctxt->scp->Np;
8  if (Np < 2) return;
9  Iam = ctxt->scp->Iam;
10  msgid = Mscopeid(ctxt);
11 
12  send(ctxt, (Np+Iam+step)%Np, msgid, bp);
13 }
bLaCbUfF
Definition: Bdef.h:54
bLaCsScOpE::Iam
int Iam
Definition: Bdef.h:17
Mscopeid
#define Mscopeid(ctxt)
Definition: Bdef.h:179
bLaCsCoNtExT
Definition: Bdef.h:23
SDRVPTR
void(* SDRVPTR)(BLACSCONTEXT *, int, int, BLACBUFF *)
Definition: Bdef.h:69
bLaCsCoNtExT::scp
BLACSSCOPE * scp
Definition: Bdef.h:26
Bdef.h
bLaCsScOpE::Np
int Np
Definition: Bdef.h:17
BI_IdringBS
void BI_IdringBS(BLACSCONTEXT *ctxt, BLACBUFF *bp, SDRVPTR send, int step)
Definition: BI_IdringBS.c:3