SCALAPACK
2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches
◆
Mindxl2g
#define Mindxl2g
(
ig_,
il_,
inb_,
nb_,
proc_,
srcproc_,
nprocs_
)
Value:
{ \
if( ( (srcproc_) >= 0 ) && ( (nprocs_) > 1 ) ) \
{ \
if( (proc_) == (srcproc_) ) \
{ \
if( (il_) < (inb_) ) ig_ = (il_); \
else
ig_ = (il_) + \
(nb_)*((nprocs_)-1)*( ((il_)-(inb_)) / (nb_) + 1 ); \
} \
else
if
( (proc_) < (srcproc_) ) \
{ \
ig_ = (il_) + (inb_) + \
(nb_)*( ((nprocs_)-1)*((il_)/(nb_)) + \
(proc_)-(srcproc_)-1+(nprocs_) ); \
} \
else
\
{ \
ig_ = (il_) + (inb_) + \
(nb_)*( ((nprocs_)-1)*((il_)/(nb_)) + \
(proc_)-(srcproc_)-1 ); \
} \
} \
else
\
{ \
ig_ = (il_); \
} \
}
Definition at line
170
of file
PBtools.h
.
171
{ \
172
if( ( (srcproc_) >= 0 ) && ( (nprocs_) > 1 ) ) \
173
{ \
174
if( (proc_) == (srcproc_) ) \
175
{ \
176
if( (il_) < (inb_) ) ig_ = (il_); \
177
else
ig_ = (il_) + \
178
(nb_)*((nprocs_)-1)*( ((il_)-(inb_)) / (nb_) + 1 ); \
179
} \
180
else
if
( (proc_) < (srcproc_) ) \
181
{ \
182
ig_ = (il_) + (inb_) + \
183
(nb_)*( ((nprocs_)-1)*((il_)/(nb_)) + \
184
(proc_)-(srcproc_)-1+(nprocs_) ); \
185
} \
186
else
\
187
{ \
188
ig_ = (il_) + (inb_) + \
189
(nb_)*( ((nprocs_)-1)*((il_)/(nb_)) + \
190
(proc_)-(srcproc_)-1 ); \
191
} \
192
} \
193
else
\
194
{ \
195
ig_ = (il_); \
196
} \
197
}
PBLAS
SRC
PBtools.h
Generated on Sun Jan 12 2025 15:58:48 for SCALAPACK by
1.9.8