ScaLAPACK 2.1
2.1
ScaLAPACK: Scalable Linear Algebra PACKage
BI_SringBS.c
Go to the documentation of this file.
1
#include "
Bdef.h
"
2
3
void
BI_SringBS
(
BLACSCONTEXT
*ctxt,
BLACBUFF
*bp,
SDRVPTR
send)
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
send(ctxt, (Iam + 1)%Np, msgid, bp);
12
if
(Np > 2) send(ctxt, (Np + Iam - 1)%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_SringBS
void BI_SringBS(BLACSCONTEXT *ctxt, BLACBUFF *bp, SDRVPTR send)
Definition:
BI_SringBS.c:3
BLACS
SRC
BI_SringBS.c
Generated by
1.8.16