OpenRadioss
2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
BI_SringBS.c File Reference
#include "
Bdef.h
"
Go to the source code of this file.
Functions
void
BI_SringBS
(
BLACSCONTEXT
*ctxt,
BLACBUFF
*bp,
SDRVPTR
send)
Function Documentation
◆
BI_SringBS()
void BI_SringBS
(
BLACSCONTEXT
*
ctxt
,
BLACBUFF
*
bp
,
SDRVPTR
send
)
Definition at line
3
of file
BI_SringBS.c
.
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
}
Int
#define Int
Definition
Bconfig.h:22
Mscopeid
#define Mscopeid(ctxt)
Definition
Bdef.h:179
bLaCsCoNtExT::scp
BLACSSCOPE * scp
Definition
Bdef.h:26
bLaCsScOpE::Np
Int Np
Definition
Bdef.h:17
bLaCsScOpE::Iam
Int Iam
Definition
Bdef.h:17
engine
extlib
scalapack-2.2.0
BLACS
SRC
BI_SringBS.c
Generated by
1.15.0