SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches
BI_IdringBS.c
Go to the documentation of this file.
1#include "Bdef.h"
2
3void 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}
void BI_IdringBS(BLACSCONTEXT *ctxt, BLACBUFF *bp, SDRVPTR send, Int step)
Definition BI_IdringBS.c:3
#define Int
Definition Bconfig.h:22
#define Mscopeid(ctxt)
Definition Bdef.h:179
void(* SDRVPTR)(BLACSCONTEXT *, Int, Int, BLACBUFF *)
Definition Bdef.h:69
BLACSSCOPE * scp
Definition Bdef.h:26
Int Np
Definition Bdef.h:17
Int Iam
Definition Bdef.h:17